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LUM : SCREEN8lc £ fcS256ecD^^-5 l 1'-h 

100 SCREEN 8:C0L0R 255,0,0:CLS 

110 DEFINT A-Z:BX=256/16:BY=212/16 

120 FOR 1=0 TO 1 

130 FOR J=0 TO 1 

140 0X=BX*8*I :0Y=BY*8*J 

150 FOR G=0 TO 7 

160 FOR R=0 TO 7 

X=OX+BX*G: Y=OY+BY*R 
180 C=G*32+R*4+I*2+J 

190 LINE (X.Y)-STEP(BX-I ,BY-1 ) »C 

200 'DRAW"C0NM-=BX; ,0 M+0,-=BY;" 

210 NEXT 
220 NEXT 
230 NEXT 
240 NEXT 
250 GOTO 250 
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IB SCREEN 8:C0L0R 255.0.B:CLS 

2B KEY6, "COLOR 1 5 , 4 . 7" +CHRS ( 1 3 ) 

30 DEFINT A~Z:DEFFNX=VAL (MID$(A$. 1 . INSTR 

(A*."-"J-1))/1 .11 :DEFFNY=VAL(MID$(A$. INS 

TR(A$. "-")+! ) ) 

40 '••• DRAWING 

5B RESTORE 190 

6B READ A$:PSET (FNX.FNY) 

7B READ A$:IF A$=>"»" THEN IF A$="**" 

EN 90 ELSE 60 

80 LINE -(FNX.FNY) :GOTO 70 

90 IF P = THEN COLOR 1:P=1:GOTO 40 

10B '••• PAINTING 

110 A$="50-150" :PAINT (FNX.FNY) .255. 1 

= "100- 100": PA INT (FNX.FNY) .255. 1 

120 A$= "29-91 ":X=FNX:Y=FNY:A$=" 153- 157" : 

DX=FNX-X:DY=FNY-Y 

13B SETPAGE .1:FOR G=0 TO 7:F0R R=2 TO 7 

:LINE (X+16»G.Y+13*(R-2) )-STEP(15.12).32 

«G-t4«R + 2.BF:NEXT:NEXT:SETPAGE .0 

140 COPY (X.Y)-STEP(DX.DY) .0 TO (XiYI.1i 

AND:COPY (X.Y)-STEP(DX.DY) .1 TO (X.Y).B. 

TPSET 

150 RESTORE 370 

16B READ A$:IF A$="*»" THEN 180 

170 READ C:PAINT ( FNX . FNY ) . C . 1 : GOTO 16B 

180 GOTO 180 

190 '••• DRAWING DATA 

20B DATA 85-42.86-36.88-31.91-27,95-23.9 

9-20.104-17.110-15.*: '• 1 • HAIR 

210 DATA 85-42.77-35.71-32.65-31.59-30.5 

6-30.50-32.45-35.*: '• 2 

22B DATA 85-42.87-39.91-34.96-29.103-26. 

113-22. 121-2B. 129-19. 137-19. 144-19. 151-2 

0.157-22.163-23.171-26.182-29.192-35.197 

-39.202-44.202-44.206-48.209-5 3.212-60.2 

16-72.216-90,214-1 10.213-118.210-132.206 

-141 .206-149.203-156. 198-163.*: '• 3 

230 DATA 197-154.198-163.200-173,206-185 

,200-179.193-170.196-177.202-187.194-180 

.183-159,185-176.190-185.185-180.178-173 

,175-166.171-157.168-148.166-138.*: '• 4 

240 DATA 178-173. 176-171 , 17B-166. 168-164 

.165-158.163-153.160-147.158-142.156-133 

.155-133.154-129.152-123.153-117.153-108 

,151-104.149-100. 146-97.142-94.135-91 .12 

6-90, 121-90,115-91 ,*: '• 5 

250 DATA 102-87,98-87,95-89,94-92,96-94, 

101-94, 115-91 ,132-84, 136-81 , 1 35-78 , 1 31 -7 

6. 102-87,98-83.95-81 ,91-78.88-75,86-72,8 

2-67.81-62.82-57,*: '• 6 

26B DATA 81-62,82-69,80-75,74-80,67-83.6 

1-88,56-93,69-97,71-99,70-101 ,50-100.36- 

98,32-96.33-94,36-92.56-93.*: '• 7 

27B DATA 85-42.76-38.69-37,63-38.57-39.5 

1-41 ,44-45,40-48.36-53.32-59.29-66.27-73 

.26-80.26-86.27-92.28-98.30-104.32-108.3 

4-112. *. 45-106. 50-100. *: '• 




"1 



280 DATA 153-117.152-123.151-128.150-132 

, 147-136.144-140, 141-143.137-145.131-147 

.127-148.121-148,115-148.110-147,106-146 

. 102-145.97-1^1 .94- 138. 91 -134. 89- 129. 88- 

125.88-120.87-1 15.88-1 12,88-107.90-102.9 

2-100 ,97-95. 101-94,*: '• 9 • EYEGLASSES 

290 DATA 89-129,88-134,86-143,84-146,81- 

150,78-153.72-156.68-157.63-157.58-157,5 

3-156.42-153.39-151 .35-148.33-144,30-139 

.29-128.29-124.29-120.31-115.34-112,45-1 

06.56-104,67-103,77-104,83-107,86-1 11 ,87 

-1 15,*: '• 10 

300 DATA 42-153.40-156.39-158.39-162.39- 

165. 41-170. 42-1 72. 45-1 76. 49-1 79. 54-181. 5 

9-182.63-183.80-183.85-185.90-186.95-187 

. 102-187. 1 10-186.1 16-185. 124-183.128-181 

,131-179.139-179.145-178.153-175.159-172 

, 164-169. 168-164.*: '• 11 • CHIN 

310 DATA 216-90,219-86.222-83.227-82.232 

-81 .236-82.240-83.245-85.249-87.253-90.2 

58-98.260-106.261-1 13,260-120.258-130,25 

4-140,249-149.243-156,227-167,238-155,24 

1-149,242-146,243-141 ,238-150,234-155.22 

6-162. *:'• 12 • GYOPI'S TAIL 

320 DATA 234-128.231-134.230-139-229-144 

,226-162.224-157.223-152.222-145.222-137 

,222-130,223-123.225-116.*: '• 13 

330 DATA 222-137.220-132.217-129,214-123 

,213-118.*: '• 14 

340 DATA 55-122.58-121.63-121.66-123.69- 

130.70-135.69-137.67-138.65-136.64-134,6 

3-130,61-127,57-127,55-129.54-131-53-134 

,52-137,51-138.48-138.47-134.49-128.52-1 

24.55-122.*: '• 15 • EYES AND MOUTH 

350 DATA 115-112.118-111.123-111.126-113 

.129-120.130-125.129-127.127-128.125-126 

,124-124.123-120.121-117.117-117.115-119 

.114-121 ,113-124. 112-127,111-128.108-128 

.107- 124. 109-118. 112-1 14. 115-112. *:'• 16 

360 DATA 91-155.95-155.97-157.100-163,10 

3-169, 1 03- 1 76, 99- 1 80. 95- 179. 93-1 77. 9B- 17 

1. 89-165. 88-1 60, 89-156. 91-155.**:'* 17 

370 '••• PAINTING DATA 

380 DATA 57-125.36,117-113,36.95-170,29. 

1 50-1 50. 1 59. 80-9B. 159. 150-50. 98. 100-90. 3 

1. 50 -97. 31. 25 0-100. 2- B-0. 252,** 
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!U=73B39^-y 




I frejBSfrscfcs-e^fflr* keyi. CHRS(e55)«*hur, 

1 DATA<B-S->-B< i*.5»9. '*** , 0xttttx0 >< "■■■"'< 

2 C0L0R15. 12.2:SCREEN5. 1 : OPEN"GRP : " AS#1 : 
I=RND(-TIME) :DEFINTA-P 

3 FORI=0TO5:READA$:SPRITE$(I)=A$:NEXT 

4 FORR=0TO9:CLS:PUTSPRITE0, ( 1 19 . 98) .7 : X= 
RNDd )*9-4:Y=RND(1 ) *9-4 : Z=0 : M=RND ( 1 )*5-2 
:N=RND(1 )*5-2. 

5 SOUND 1 .1 :SOUND8.15:SOUND7>0:SOUND6>30 

6 S=STICK(0) :M=M+(S<5ANDS>1ANDM>-4)-(S<9 
ANDS>5ANDM<4) : N=N+ ( S< 7ANDS >3ANDN >-4 ) - ( (S 
=10RS=20RS=8)ANDN<4) :X=X*1 . 1+M:Y = Y*1 . 1+N 

7 LINE(127-Z+Q*4.106-Z+W*4)-(127+Z+Q*4> 1 
06+Z+W*4) ,12.BF:FORI=1T08: I=I-(I=3)*5:J= 
Z¥I:LINE(127-J+X*4.106-J+Y*4)-(127+J+X*4 
, 106 + J + Y*4) . 15+(I=8)*5.B:NEXT:Q=X:W=Y:LI 
NE(250.0)-(255,86) . 15. B 

8 Z=Z+1+Z¥20:PUTSPRITE1 > (251 -Z) ,8. 2: PUTS 
PRITE2. (37+Z.181-Z) .1 . 1+Z¥17 

9 SOUND0.255-Z*3:IFZ>80THEN10ELSE6 

10 BEEP:A=SQR(X A 2+Y A 2) : PS ET ( . ) . : PRINT 
#1 . USING"###0 ###nT ;R+1 ;A:MT=MT + A 

11 IFR=9THENPSET(120,0) : PRINT* 1 , "St)t*Z";M 
T;"7A.":PLAY"S0M1999O5L16CDEFDFDGRBRB" 

12 IFSTRIG(0)THENNEXT:RUNELSE12 
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qtimft 



r^-AaV)--.-? MS>'>0--h7^§«^*^©>7fi^7)Mili r THEPOINTCHANGER J t r THEWORLDSUGOROKUj<7)-^f}«»IC'j:% 
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1 COLO 
EFINTA 
p":FOR 
I)=SIN 
SPRITE 

2 CLS: 
16(0) : 
"200-K 

3 S = ST 
*3-(S= 
3ANDD< 
E>0)*2 

4 SPRI 
=TIME/ 

5 J = -( 
))*3:P 
PLAYER 
FORI=0 

6 PUTS 
:PUTSP 
RETURN 



R15.1 . 1 :S 
-W:DIMX(3 
I=0TO36:Z 
(Z) :NEXT: 
G0SUB4:E$ 
A=50:D=50 
NEXT:60SU 
:NEXT:CLS 
ICK(0) :T = 
3ANDA<80) 
80)*3:B=B 
-(E=0)*34 
TEOFFrPLA 
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T(0) >T(1) 
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COLOR15.14,0:SCREEN2.2:DEFINTF-U:S(3)= 
1 -Sf7)=15:DIMX(15) ,Y(15) :W=.33 

2 FORI=0TO15:CLS:CIRCLE(8.8) ,7:PAINT(8.8 
)-X(I)=COS(Z):Y(I)=SIN(Z) : LINE- (X ( I ) *9+8 
,Y(I)*9+8) , 14:Z=Z+.3927:FORJ=0TO3:FORK=0 
T07-VP0KE14336+I*32+J*8+K,VPEEK(256*( JMO 
D2)+K-(J>1)*8):NEXTK.J.I:0PEN"6RP:"AS#1 

3 CLS-L=L-(L<9) : L INE ( 1 28+L*8 . 96+L*8 ) - ( 1 2 
8-L*8.96-L*8) .1 , BF:PRINT#1 , L : FORQ=2T01 3 

4 M=RND(1 )*232+12:N=RND(1 ) *1 52+1 2 : IFPOIN 
T(M.NX>14THEN4ELSECIRCLE(M,N) - 8, Q : PAINT 

(M,N) .Q:BEEP:NEXT 

5 BEEP:A=120:B=175:E=0:Q=2:R=12:V=240:SO 

UND7.62:SOUND8.15 

6 S=STICK(0) :R=(R+S(S))AND15:E=E+STRIG(0 
)*2*(E<62)+(E>0) :SOUND0.80-E:D=E/8 

7 A =A+X(R)*D.B=B+Y(R)*D:PUTSPRITE0> (A.B) 
,15,R:PUTSPRITE1 . (A+3.B) -1 . R 

8 P=P0INT(A+8.B+8) : I FP= 1 THENE=0 

9 IFP=QTHENQ=Q+1 :SOUND0>99: IFQ=14THEN3 

10 IFA<0ORA>240ORB<0ORB>176THENE=-E 

11 V=V-W:PUTSPRITE3, ( V , 1 75 ) . Q . VAND1 5 
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~1-(7(DmA- 



► iSTOtt/Jl^-y 



1 COLOR10.4,4:SCREEN5.3:DEFINT 
RP:"AS#1 : SPRITES (0) =STR I NG$( 16 
TE$( 1 )="*——*— 666999**" :SOUN 

2 CLS:DRAWBM88. 1 04S32R 1 D2F1 R1 
R1D6R1U5R1D5R1U4R1D8G1D2L6U2H3 
89,121 ) :T=0:Z = 1 : W = 64 : X=1 04 : S = 

3 SOUND2,W+100:SOUND8.0:C=T:T= 
FT=0ANDCTHENIFPOINT(X.W)=10THE 
84THENSOUND8. 15:PSET(X.W).15:S 

4 X=X+Z:W=W-T*8+4*(W>64) : PUTSP 
-64) .1 .0:PUTSPRITE1 . (X.W-32) .1 
X<104ORX>171 )*(2-.0 5*(ABS(Z)<5 
128THEN3ELSEIFPOINT(X.W)< >10TH 
0:GOTO3 

5 PLAVS0M20000O3C1" :PSET(88,0 
"7*9* ! *>2*<->. !":H = S-(H>S)*(H-S 

6 LINE(X,W)-(X-40+RND(1 )*80,W- 
80) ,8:PSET(96,170) :PRINT#1 ,"SC 
STRIG(0)THEN2ELSE6 



A-W:OPEN"G 
.176) :SPRI 
D7.0 

U7R1D5R1U6 
U3":PAINT( 
:SOUND9.10 
STRIG(0) :I 
N5ELSEIFW> 

S+1 
RITE0, (X,W 
4,1 :Z=Z*( ( 
) )+1 ) :IFW< 
ENW=W-4:T= 



:PRINT#1 , 



40 + RNDd )* 
"S"HI"H:IF 
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CRAZY ROOM 



fis^y—n-k 





1 CLE AR200.&HD4FF:DEFUSR=PEEK( -2442 )+PEE 
K(-2441 )*256+56:A=USR(&HD4FC) : '0#00*vi A # 
V*»H8tf>5<# tT#*("»3!*-!3A0:/353*»s*>*>*O~#3A0 

=353*7&V#078? 

2 'CD6F00CDCC0 0210 020 0120 03EF1CD560 0010 
160CD470021A8D6 110 0380 11000CD5C0 021 E8D6E 
5DDE1068036D12310FBDD360 0A0DD3601A0DD360 
200DD36030ADD3604202168D70640ED5FE60 33CE 
D44772310F53E0132A8D721A9D7060636002310 

3 'FBAFDDE5CDD500DDE1B7282721B6D64723231 
0FCDD7E018623FE043807FEF830 03DD7701DD7E0 
086FE043807FEB73003DD77003AA8D74FFD21E8D 
611040 0FD19FD360201ED5FE607C607FD7703FD7 
E00DD9600FE073806ED44FE07300EFD7E01DD96 



mmnnm 



A USR!S&on>*/cUffl 



ynv^kmm 



1 ^isy^mmomfc/us 

RH?S©S«/V^>fg©^ft 
/ R E MSBit©V V VWt- 

2-6 REMXBitffi7y> 



■72/>»tt 



B.HD4FO-BHD51 4 

ilHffllSfSS 

SHD51 5-SHD520 

SHD521-SHD5B0 




SHD5B1-SHD592 
SHD593-8.HDB2C 
SHD6BD~SHD638 

x-:?JU©&2£ 

SHDB39-SHDB4A 

SHD64B~SHD65A 

SHDB5B-SHDB81 

SHD6B2~BHD685 
CTRL+STOPA;WJ£ 
SHD6B6-SHD690 

mrmz 

BHDB91-SHDBA9 

SHDBAA-SHDBB9 

SHDBBA~SHDBC9 

SHDBCA-SHDBE9 

BHDBEA-SHD7B9 
MIU7^-f S7MJt^-S 
x-7'JU 
SHD7BA-BHD7A9 



4 '01FE073804ED44 
D5FE60FCD4D00AFCD 
AA8D7913C47232310 
000FEF83002180B3E 
E0086FD7700000000 

5 'D67EED44770DC2 
D5C00210D1811A9D7 
621ADD70605347EFE 
322AFD7AFB5201C3E 
8023518DD7E04FD77 

6 '0100060B78B120 
8D619060EAF5ECD93 
BDBDBFF7E3C3C7EFF 
2020002FE02FE00FE 
00040000000880089 
000 ! 



FE073018AFCD8FD621031BE 
D80 0B728EFC31FD52166D73 
FCFD7E018623FD770 10 0000 
10CD8FD62B7EED447723FD7 
00FEB7300218093E10CD8F 
99D521E8D611001B0180 0C 
06061 AC630CD4D0 0231 31 0F 
0A2005360 02B10F52AAFD72 
03A4201621A8D7347EFE203 
04DD7E05FD770 5CDB700D8 
FBC35FD5E5D5C516005F21C 
003C2310F8C1D1E1C93C7ED 
FFFFFF7E3C00FE02FE 02000 
FE00 00 000 000 001F8710101 
008A0000B81010100018000 
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5t!« ftguE* 



l-inx-jT, - <SnB*> PHIS <«IPl»> 7EftE# <«£^m> tt4>e#l 6, V^Mt- 

<mm> w&sat 7 t>jv^^6 . -■ <fsi> *»- <iwi> «»c <ss«> 



m&mitto 



EE32/2+VRAM64K BY special ^acchan 




► »OTIi3B'S-y 



10 SCREEN5.2:COLOR15.0 
20 DEFINTA-Z:OPEN"GRP: 
30 U=127:HI=0:R=9:FORI 
RJ=0TO3:X=J*64+32:FORW 
40 CIRCLE(X.Y) .R-W*3.C 



0:SETPAGE0.1 :CLS 
'AS#1 :R=RND(-TIME) 
= 0TO1 :Y=I*64+32:F0 
=0TO3:C=W+9 

PAINT(X.Y) ,C,C:NE 



XT :R=R+3: NEXT: NEXT :SETPAGE.0 

50 READA$:FORI=0TO13:VPOKE&H7692+I.VAL(" 

&H"+MID$( AS .1*2+1 .2) ) :NEXT 

60 COLOR= RESTORE: FOR I =0TO3: RE ADAS :B$="" 

70 FORJ=0TO31 :B$=B$+CHR$(VAL("&H"+MID$(A 

$.J*2+1 .2) ) ) :NEXT:SPRITE$(I)=B$:NEXT 

80 B$=STRING$(32. 110) : COLORSPRITES ( 1 )=B$ 

:COLORSPRITE$(3)=B$:VDP(10)=VDP(10)ANDU 

90 ST=1 :TI=250:SC=0:X=120:M=0:N=0:F=0 

100 EX=120:EY=50:G=TI:CLS:GOSUB260 

1 10 FORW = 0TO1 :S = STICK(0) :T = STRIG(0) :IFT = 

-1THEN280ELSEIFF=1THEN30 

120 X=X+( (S=3)*(X<204)-(S=7)*(X>32) ) *6 

130 GOSUB260:P=POINT(X+2.156)+POINT(X+13 

.156) :IFP>0THEN370 

140 IFF=2THENW=1 :GOSUB320 

150 IFW=0ANOEX<999THENFORI=0TO150:NEXT 

160 NEXT:IFEX=999THEN250 

170 EX=EX+HX:EY=EY+HY:PUTSPRITE2. (EX.EY) 

.13.2: PUTS PRITE3. (EX.EY) . .3 

180 IFEX<320REX>223THENHX=-HX: J=1 

190 IFEY<32OREY>90THENHY=-HY: J=1 

200 IFJ=1THENJ=0:GOTO170 

210 HX=HX+RND(1 ) *9-4 : HY=HY+RND ( 1 )*9-4 

220 IFABS(HX) >1 6THENHX= 1 6*SGN ( HX ) 

230 IFABS(HY) >1 6THENHY= 1 6*SGN ( HY) 

240 IFPOINT(EX+8.EY+8) >0THEN270 

25 G=G-1 :PSET(10,2) .0:PRINT#1 . RIGHTS (" 

"+STR$(G) ,3) :IFG=0THEN370ELSE110 
260 PUTSPRITE0. (X.155) . 1 3 . : PUTSPRITE1 . ( 
X.155) . . 1 :RETURN 

270 COLORM0.7.0.0) : GOSUB430 : PUTSPRITE2 . 
(0.200) : PUTS PR IT E3. (0.200) : COLOR= ( . . . 
0) :EX=999:GOTO250 

280 IFF=2THEN130ELSEM=M+1 : I FM = 3THENN = N+ 1 
:M=0:IFN=8THENN=7 

290 F=1 :GOSUB420:R=N*3+9:FX=(NMOD4)*64+3 
2-R : FY= (N¥4)*64+32-R: COPY (FX, FY) -STEP (R* 
2>R*2) .1TO(X-R+8.155-R*2) : GOTO 130 



300 GOSUB430:COLOR=(0.7.7.7) :SETPAGE.2:C 
LS : R2=R*2 : COPY (FX. FY) -STEP (R2.R2) ,1T0(8. 
8) :SETPAGE.0:F=2:FX=X-R:COLOR=(0.0.0.0) 
310 FY=139-R2:MX=8*SGN(EX-X) :MY=-8:M=0:N 
=0:VDP(10)=VDP( 10)ANDU:GOSUB340:GOTO130 
320 FX=FX+MX:FY=FY+MY:MX=MX+MX*(FX<90RFX 
X223-R2) )*2:MY=MY+MY*(FY<-MY)*2 
330 GOSUB440:MX=MX+SGN(X-FX)*2:IFABS(MX) 
>8THENMX=8*SGN(MX) 

340 COPY(0.0)-STEP(R2+16.R2+16) .2T0(FX.F 
Y) : IFFY >150THENF=0: LINE (FX. FY) -STEP (R2+1 
6.R2+16) ,0,BF:SOUND8.0ELSERETURN 
350 IFEX=999THENPSET(70.90) , ,TPSET:PRINT 
#1, "STAGE ";ST;"CLEAR ! ! " :ST = ST + 1 : SC = SC + 
ST*G¥2-R2:FORI=0TO900:NEXTELSERETURN 
360 TI=TI+20*(TI >70) :GOTO100 
370 FORI=0TO7:GOSUB430:COLOR=(0.7.0.0) :C 
OLOR=(0,0,0,0) :SOUND8.0:NEXT 
380 IFHKSCTHENHI=SC 

390 PSET(90.70) .0:PRINT#1 ."GAME OVER" 
400 PSET(60.95) ,0:PRINT#1 ."YOUR SCORE : 
";SC:PSET(60,105).0:PRINT#1,"HIGH SCORE 
: " ; H I 

410 FORI = 0TO1 :I = -STRIG(0) : NEXT : FORI = 0TO5 
00:NEXT:GOTO90 

420 SOUND8.14:SOUND7. 1 84 : SOUND 1 .15-N:SOU 
>255-M*50:RETURN 
S0UND7.177:SOUND8.15:S0UND6.32:RETUR 



ND0 

430 

N 

440 

450 

460 



S0UND8.12:S0UND6.RND(1 ) *9 + 20 : RETURN 
DATA 700 070 05700777073404 56067707 
DATA 0021010131091406060C414141738D8 
1000404040C18F8602030327A787C3101 
470 DATA 0121212111190F07070F4F5F7F8D818 
1 8084848488900 080C0C0C282868381 81 
480 DATA 000001070F0E180000309F7F2D2D241 
B00000 00008081C1C3CFCF9FEECEC64D8 
490 DATA 0001070F1F1F3F3F*3F4FE07F1F121B0 
00080E0F0F0F0E0E0C00207FEF 01 09800 
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20 msimmw/y^yjvf 
3D-40 m*m.Ji/&^< 

50 Ab^SfflOltx. 
BO-BO X^-f SA£->5£ 

90-100 ^S5iSS/BH;^* 
110 XT-f^^AA/S'JS 
-A2J/MJ#— AWfiBE 

120 S§£ffl)H§£SSfr 
130 gWDMafcOfU^ 

140 ^©RfifcfS^s 

150 5S£©^»2]tISS 
160 UFO©#Sffl£ 



170 UFO©^ 
180-200 UFOA'nIB©«fr 
©¥iJ5E=^»if:»©Kg 
210-230 UFOffl^Slti^M 

240 UFOroSfcO*!)^ 
250 ^-fAMfr-S^/^-fA 

260 6Sa©S^ 
270 UFO©^* 
2B0-290 §i£*S<-f§ 
300-310 $¥©#g« 
320-340 3£©$» 
350-360 3.x-v^'J7 
370-410 ^-AtT-A- 



420-440 SSaSB+t^ 
450 Ab^Sx"— S'tfTHTCR 
d*Z.fo) 



460-490 X73"fhA^-X 
X?7^ S©fix— ^(fJ6Qr 






■flHT&*t)C*rtB¥ 



■^P^AitRfflT 1 — £ ffiU75liB7^-v 



10>wD50 
50>VRP0 
90>SnE0 
130>LYH0 
170>knN0 
210>J7G0 
250>FKT0 
290>Zd02 
330>w6V0 
370>1SG0 
410>KrE0 
450>5i60 
490>iOY0 



20>64A0 
60>M250 
100>ix50 
140>m220 
180>6Z90 
220>I780 
260>H090 
300>QRW1 
340>S6E1 
380>PW20 
420>8WE0 
460>SWW0 



30>2Ut0 
70>DYb0 
110>1vO0 
150>wg70 
190X1990 
230>x780 
270>rSg0 
310>sWj0 
350>Xgc1 
390>el50 
430>iV30 
470>0UX0 



40>X4P0 


80>aLP0 


120>aCG0 


160>Jo20 


200>jL20 


240>f Q40 


280>cqP0 


320>stC1 


360>s750 


400>7eb0 


440>Mp50 


480>82Z0 



[s p e c i a i i: a c c h a ^ifmrtsx^amam^hnu^mmm 
mm* Qscna.#m?t=ziite&?>ttii> K>?\3Vz>nux, osto 

ttf, BaSBTBSfryau, Z(D®&z>tz T K I NG SL I MEIIj 

So d:^5r^©^#thS3-5Ctt, ft»g(UJCU5frfeLn&U„ sim 
ra*O3&-fflg*()iS©^<!:)tfSS0ft:„ £o, &tW&[iB3fco 
fcOfSfflrco iiff. #a(B3E7B)2l8Slcite»^«0SUfc. »*& 
A,rtt1*6UUS«?l;J*A,ttltS. SMltKStfol+rHuru^L-fco 

atteiitf^fc&^riattsstf/vrufco 



r - 



/-" 



A 



llil(- 




■K 

f 
1 



13 

re. 



ill 










ANALYTIC COLOR 



7^Ux'r , v^-^^- 



ES3ES32/2+VRAM64K BY HASEMAKO ► j6TOtt36'S-2> 



10 'L£2uffA,#<.tottU£.t,'H><V7h ANALYTIC COLOR 
20 SCREEN 1 , 0,RND(-TIME) : WI DTH29 : KEYOFF : C 
OLOR15.1 .1 :DEFINTA-Z:PRINTSPC(95)"PLEASE 

WAIT" 
30 FORI = 0TO1 : SPRITES! I )="00xxM" :NEXT 
40 FORI=336T0719:A$=BIN$(VPEEK(I)¥4) :B$= 
LEFT$(AS,1 ) rVPOKEI , VAL ( "&B" +BS+BS+ RIGHTS 



(AS. 6) ) 
I*(I<5) 
4*( J>1 ) 
50 SI C 1 



:NEXT:FORI=2T07:VPOKE8214+I .1*16- 
:FORJ=0TO7:VPOKE(176+I*8)*8+J.-25 
: NEXT: NEXT : VPOKE8208 > &H81 
=-1:S3(3)=-1:S5(5)=-1 :S7(7)=-1 
60 FORI=0TO7:X(I)=0:Y(I)=0:SC(I)=0:B(I)= 
0:PUTSPRITEI. (0.-32) , 1 5 : NEXT : CLS : L0CATE6 
, 10 :COLOR=( 15.0.0.0) : PRINT" [ANALYTIC COL 
OR:" : FORI =0TO930: NEXT: FORI =0TO1 4: A=7-ABS 
(7-1) :COLOR=(15.A.A,A) : FOR J =0TO45- ( A=7 ) * 
1310:NEXT:NEXT:CLS:COLOR=(15,7,7.7) 
70 F0RI=2T07:C0L0R=(I . - ( 1 = 5 ) *7 . - ( I =6 ) *7 , 
-(I=7)*7) : NEXT :FORI=0TO20 0: NEXT 



80 FORI=0TO1 :LOCATE7+I*14.20:PRINT" 

":L0CATE7+I*14,21 :PRINT"R G B":L0CATE6+I 

#14.11 :PRINT"PLYAER" : 1 + 1 :NEXT 

90 FORJ=0TO3:FORI=0TO6:LOCATE(JMOD2)*14. 

1 + 13+1 J >1 )*10:PRINTSTRING$(6. 192+(J+(J = 3 

)) *8 ): NEXT: NEXT :P=RND(1 ) *2 

100 FORI=0TO1 :LOCATE6+I*14,9:PRINTSPC(6) 

•NEXT-FORJ = 0TO7:FORI = 0TO2:C(I)=RND(1 )*8: 

NEXT:COLOR=(4,C(0).C(1).C(2)):PLAY"SM600 

0O5C20" ."SO5F20" : FORI =0TOJ*80 : NEXT : NEXT 

110 P=1-P:S=STICK(P) :X(P)=X(P)+(X(P)>0AN 

DS7(S))-(X(PX2ANDS3(S)) :PUTSPRITEP. (73 + 

P*112+X(P)*16.176) :A=Y(X(P)+P*3) :A=A-(S1 

(S)ANDA<7)+(S5(S)ANDA>0) : L0CATE7+P*1 4+X ( 

P)*2.20-A: Y(X(P)+P*3)=A 

120 IFATHENPRINTCHR$(216+X(P)*8)CHR$(29) 

CHR$(30)" "ELSEPRINTCHR$(30)" " 

130 C0L0R=(P+2.Y(P*3) ,Y(P*3+1) ,Y(P*3+2)) 

140 7 ON-STRIG(P)GOSUB150:GOTO110 
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150 IFC(0)=Y(P*3)ANDC(1 )=Y(P*3+1 )ANDC(2) 

=Y(P*3+2)THEN160ELSE170 

160 SC(P)=SC(P)+1 :L0CATEP*14+SC(P) .22: PR 

INT"V" :GOSUB210:GOSUB230:FORI=0TO2000:NE 

XT:IFSC(P)=3THEN180ELSERETURN100 

170 BEEP:B(P)=B(P) + 1 : L0CATE4+P*1 4 . 22 : PR I 

NTB(P) :IFB(P)=8THEN180ELSERETURN 

180 L0CATE8-(SC(1 ) =30RB ( ) =8 ) *1 4 . 6 : PRINT 

"WIN 1" :GOSUB20 0:ON-(B(0)=8ORB(1 )=8)G0SU 

B230:GOSUB190:RETURN60 



E£& 



^ 



190 IFSTRIG(0)ORSTRIG(1 )THEN190ELSEFORI= 
0TO1 :I=-STRIG(0)-STRIGt1 ): NEXT : RETURN 
200 PLAY"T240SM900 0O5R3G6A12B6O6C12R" 
210 PLAY"TSM5000O5C" . "S04E" >"04SG" 
220 FORI=0TO0:I=PLAY(0) :NEXT:RETURN 
230 FORJ=0TO2:FORI=0TO1 : L0CATE6+ 1*14+ J*2 
,9:PRINTC( J) ;: NEXT: BEEP: NEXT: RETURN 



mnonm 



X(n) fi-V )[,(DX&m=o 

ntt^b-T +>-§*§, UT£< 

iciesnrn&i^ntiqii; 

A ;ftffl 

A$, B$ ^fv^C^J^ 

B(n) gyMV-O-T. 

C(n) ll©Kl/7S^ 

©ffi(n : Q=mm^ 1 =*M 

ft, E=nmft) 

i , j lu-ym 

p im-ism^nyis^v- 

s x^^^yxtim 

SI (n), S3(n), S5(n), 
S7(n) Xj-f^AWJ 

SC(n) g^U-ff-cDT. 

a? 

Y(n) S^b-r-f-©PS 



mill? v hfiE#ffi=> n : 
~2 = ?b-ff-1ffl©fi£:ft\ 



180 mmm^/mmm/'jy 



190 S'J+J-A^^S-y-^ 
ED0—2PD BGM,S^++^ 

230 lEPumti-? 



1 VfcCfc 



10 REM* 

eo vjmmmB^/mnmmm 

30 7.75K NA$>-:v£§i 

40 ^vz'O'pi^-yim./ 
*vz>yy<D&WLi£. 

50-60 MSISS, 7.75KS 

70 A°b-vht39jg;t 

80- 1 00 EHfffig/P^ffifflg 

no-IPO Xx-r^^A*/* 

©SSf • ss 

130 AL/yNtJDDJ&Jl 

1 40 S'J*f-A**JS 

1 50 IlPfrfflfiJ^IEfg&b 
frl60-"\/ISSn&6fTl70'\ 
160 7.a7Mtf-^^/^f-A 
*S7¥!]S:=>*f7&6i7l80^ 

i7o mmm/zymmum 



(»<7f=t^lc3000^ 



cRock 3 

River 

qpl*y 



1 



SUS 



[HASEMAKOISONY 

tfftfi£«x-rX<7£ffir>/cO 

*A^6*US# *"PLAYE 

&C3000(S. tth^aO- 
** • A'^-CX ■ 7T— T7. 

S?1fil?R§±7(l00M).B*A 



^P^ABRfflx- 


"£ £^731*67^-2/ 




10>21M0 


20>ZtS0 


30>DQ80 


40>GtM4 


50>SFG0 


60>vcr5 


70>rUd0 


80>pH51 


90>PjD1 


100>eKH2 


1 10>AuN5 


120>Z1M0 


130>SqC0 


140>Em20 


150>aPW0 


160>Uf61 


170>gqP0 


180>Qes0 


190>LpT0 


200>He70 


210>J060 


220>Z340 


230>v6O0 





CLICK IT 



?U*')/h 



CS32/2+VRAM64K BY 



>mw5\tz^^-v 



10 DEFUS 
20 DEFIN 
ST=15:SO 
30 DIMMt 
40 Z=USR 
>16*N+14 
. 16*N) . 1 
50 DRAW" 
0M+0.-2M 
,33)-(13 
60 DRAW" 
2M+2.0M- 
-2M+2.0M 
,4:X=4: Y 



R=&H90:SCREEN5>2>0 
TA-Z:SETPAGE0,1 :CO 
UND12»40:OPEN"GRP 
5.7) ,S$(ST) ,P(ST) 
(0) :FORN=1T08:LINE 
) ,14+3*(N=8) -BF:LI 
5:LINE-(0.16*N+14) 
A0S4C4BM6.35M-4.4M 

6.0M+0.-3" :PAINT( 
,46)T0S:COPYS.1TO( 
BM7,71M-3.-3M+2,0M 
3.3M+0.1M-3.3M+2.0 

3.-3":PAINT(7,67) 
= 84 



LOR15. 1 . 1 :CLS: 

"AS#1 

S(100) 

(1 . 16*N+1 )-(14 

NE( 14. 16*N)- (0 

.15:NEXT 

+4.4M+0. -3M+6. 

6.39) ,4:COPY(2 

13.49) 

+0.-2M+2.0M+0. 

M+0.2M+2.0M+0. 

>4:PAINT(7.73) 



70 FOR 
221211 
80 X = X 
90 LIN 
100 FO 
(C.D+1 
110 LI 
120 FO 
XT:LIN 
P4:F0R 
:LINE( 
4:F0RY 
FORI=0 



I=0TO27 
1313130 
+(A=0)- 
E(7.92) 
RI=0TO7 
12) .1 :N 
NE(3.99 
RI=0TO7 
E(5.101 
Y=5T09S 
6.102)- 
=5T09ST 
T018:RE 



PSET(X.Y 
310300333 
(A=1 ) :Y=Y 
-(8.93) .2 

READA.B 
EXT:R=RND 

-d 1 .107 

READA.B: 
)-(9,105) 
TEP4:PSET 
(8.104) .1 
EP4:PSET( 
ADX.Y:PSE 



) >2:A=VAL(MID$("31 
0221". 1+1 .1 ) ) 
+(A=2)-(A=3) :NEXT 
>B 

C.D:LINE(A,B+112)- 
(-TIME) 
) .8.BF 

PSET(A.B+96) , 14:NE 
.9,BF:F0RX=5T09STE 
(X. Y+96) .8:NEXTY.X 
1 .BF:F0RX=5T09STEP 
X. Y+96) .9:NEXTY.X: 
T(X.Y+96) .6:NEXT 
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m 
< 






'STAGE ## 
'LEFT ## 



=3ANDX< 



130 SETPAGE0.0:FORI=0TO3 

140 RE ADAS: FORJ = 0TO1 5 : VPOKE&H7800 + 1 6*1 + J 

, VALC&H"+MID$(A$, J*2 + 1 ,2) ) : NEXT J . I 

150 F0RI=1T0ST:READS$(I) :NEXT 

160 P=INT(RND(1)*ST)+1 : IFP ( P) = 1 THEN 1 60 

170 CLS 

180 PUTSPRITE0. (0.216) : 1=1 : F0RY=1T06: FOR 

X=1T04:N=VAL(MID$(S$(P) , I , 1 ) ) : M ( X , Y ) =N : G 

OSUB420: 1=1+1 :NEXTX,Y 

190 PRESET(97, 20) :PRINT#1 .USING 

";P:PRESET( 97.30) :PRINT#1 .USING 

";ST-CL:X=1 : Y=1 :BL = 24 

200 S=STICK(0) :X=X+(S=7ANDX>1 )-(S 

4) :Y=Y+(S=1ANDY>1 ) - ( S=5ANDY< 6 ) 

210 PUTSPRITE0. (16*X+73> 16*Y+43) .1.0 

220 PUTSPRITE1 . (16*X+73> 16*Y+43) ,15.1 

230 IF PEEK(&HFBEC)=127THEN180 

240 IF PEEK(&HFBEC)=251THEN160 

250 IFSTRIG(0)=0THEN200 

260 C = M(X,Y) :ON" C+1 GOSUB280 . 280 . 290 . 320 

,350.380.390,410.280 
270 IFBL=1THENF0RB=1T06:F0RA=1T04:IFM(A, 

B)=8THEN480ELSENEXTA,B:GOTO20 0ELSE200 

280 RETURN 

290 FORI=0TOX-1 :N=M(I+1.Y):M(I.Y)=N 

300 SWAPX.I:GOSUB420:SWAPX,I:NEXTI 

310 GOSUB440:N=0:M(X,Y)=N:GOSUB420:IF M( 

0,Y)>0THENN=0:M(0,Y)=N:BL=BL-1:S=X:X=0:G 

OS UB420:X=S: RETURN ELSE RETURN 

320 FORI=5TOX+1STEP-1 :N=M(I-1,Y):h(I,Y)= 

N 

330 SWAPX,I:GOSUB420:SWAPX,I:NEXTI 
340 GOSUB440:N=0:M(X,Y)=N:GOSUB420: IFMC5 
, Y) >0THENN=0:M(5.Y)=N:BL=BL-1 :S=X:X=5:GO 
SUB420:X=S: RE TURN ELSE RETURN 
350 U=M(X.Y-1 ) :D=M(X,Y+1 ) :M(X.Y-1 )=D:N=D 
360 GOSUB450:Y=Y-1 : GOSUB420 : Y=Y+ 1 :IFM(X. 
0)>0THENIM = 0:M(X.0)=N:BL = BL-1:N = 0:S = Y:Y = 

:GOSUB420:Y=S 

370 M(X.Y+1)=U:N=U:Y=Y+1 : GOSUB420 : Y = Y- 1 : 

IFM(X,7) >0THENN = 0:M(X,7)=N: BL = BL-1 :S = Y:Y 

=7 -GOSUB420:Y=S: RETURN ELSE RETURN 

380 N = INT(RND(1)*7+1 ) : IFN = 5THEN380ELSEGO 

SUB470:M(X,Y)=N:GOSUB420: RETURN 

390 GOSUB430:FORB=Y-1TOY+1 : FORA=X- 1 TOX+ 1 

: IFM(A.B) >0THENN = 0:M(A.B)=N:BL = BL-1 -.SWAP 

X,A:SWAPY.B:GOSUB420:SWAPX.A:SWAPY.B 



400 


NEXTA,B:RETURN 






410 


GOSUB460 


N=0:M(X,Y)=N:BL=BL-1:GOSUB4 


20-.RETURN 








420 


COPYC0.16*N)- 


15, 16*N+15) 


1 TO (16*X 


+ 80 


16*Y+40) 


0:RETURN 




430 


SOUND7, 1 


SOUND0. 1 :SOUND1 , 


3:SOUND1 1 ,0 


:SOUND8.90 :S0UND6 


240:SOUND13 


0:RETURN 


440 


Z=USR(0) 


:PLAY' 


'06V15A64": RETURN 


450 


Z=USR(0) 


:PLAY' 


'L64V1507CD" 


:RETURN 


460 


Z=USR(0) 


:PLAY"V15L6401GC" 


:RETURN 


470 


Z=USR(0) 


:PLAY"V15L6408DED 


' :RETURN 


480 


PUTSPRITE0. (0 


,216) :PRESET(100,90) :PR 


INT#1 ."GUTI 


i i " 






490 


Z=USR(0) 


:PLAY 


'T130V15L4O4FGDEC2" :P(P 



mtOmfir 



X, Y ^-VJWuS. 5© 

a, as, b. a a k j. 

r, s, u, z nm 

bl mon^com 

CL i7'J7Ufc7.x-y« 

M(n, m) ~?^y 

N 5©*:H(1 :Kfes2 : 



£, 3 : C 4:±TSi, 
5 : r ?j- B : M%. 7 : ;£iL 
B : Me)^5SS++7T'fIffl 

p y^-i^cD^-v^ 

P(n) S7t-vWJ7 

s(n) ^(djw -yitmm 

(COPYXffl) 

S$(n) 7st— s J?—9 

ST iXx- VB. 



^Q^yhmt 



10-150 7-AV)mit 



)=1 :CL=CL+1 :FORI=0TO60 00:NEXT 

500 IFCL<STTHEN160 

510 CLS:PUTSPRITE0. (0,216):PSET(50.70):P 

RINT#1 , "CONGRATULATIONS !" 

520 IFSTRIG(0)THENRUNELSE520 

530 D AT A7, 2, 7. 4. 3. 3. 5, 5, 11,3,9,5.2.7,4,7 

,12,7.10.7,3,11,5,9,7,12,7,10,11,11,9,9 

540 DATA5,3,9,3,3,5,11 ,5,3,9.11,9,5,11,9 

,11 :DATA 2,2,3.3.10,10,11,11-12,12,7,2,7 

,3, 7, 11, 7, 12, 2, 7, 3, 7, 11, 7. 12, 7, 12, 2, 11, 3 

,10,4,4,10,3,11 ,2,12 

550 DATA070810E38080808080808080808080FF 

560 DATAC02020FE0101FE1010E01010E01010E0 

570 DATA00070F1C7F7F7F7F7F7F7F7F7F7F7F00 

580 DATA00C0C000FEFE00E0E000E0E000E0E000 

590 DATA 263445663784763256446335 

600 DATA 117724641722867614121311 

610 DATA 222233344567865443332222 

620 DATA 632354565462534523483317 

630 DATA 132756413561284567123327 

640 DATA 741141611411461384243212 

650 DATA 111811723641136111421142 

660 DATA 311217141414141876311112 

670 DATA 711146614426211411117811 

680 DATA 811144421611444236214447 

690 DATA 462144113411781142114112 

700 DATA 117236813424411214141111 

710 DATA 311131811621114141361211 

720 DATA 111811144112462441443137 

730 DATA 866611146164661416134161 



ID — 3D USRiSSKP 
SGGDPLAYXfflflJIIHIi) 

MWx-y»88£/E$!lSg 

40- 1 20 ^->'l C 81131 

©5£ffi< 

130-140 m&Z.fo't.-VigL 

o {zjm./T-?^ sa^- 

150 Xf-yf-^'ift; 

160-170 SfXx-vlSS 

160 7.-x-y'S^13S 
170 B@;££ 



180-190 XT-VWWlit 

1B0 5©SS£IB1§ 

190 7,=r-*mm/mv® 

200-270 xjyvm 
200-220 t>-y>\s®vi 
230 w-y*~xw&. 

240 ESC*-A^j|iJS 

250 wjn-Kmm. 

260 *-VJbfiZBffl5ffl« 

mc^o&yy^fti®. 
270 xt— vwyy&. 
280-410 ssro^ii+t^' 
PBO 5/r&U£S<k Kfi- 
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290-310 £ 

320-340 6 

350-370 ±TSS 
380 r ?j 

390-400 MM 

410 nm 

420 5*S+t^' 

430-470 gmmmmyy 

480-500 T.^-y^'JT' 

510-520 Tf-JL^'JT 7 

530-730 7 s — $> 
530-540 ;lMc!:iif£©ilS 
A^->fFfSffl(nlOOJ20r 

550-580 T.T^-fK'W- 
>y-$>(fJ140TK5>3SW 
590-730 Xf-y?-5 



JiE 



XT-VT-^BEffl^-K 



(£!KN©IOT 



^Sw 



£±©Kfr 






l :.^ □ 



Bj720ffl&;^x-v'g5(S 



IJST^\©ftAX 'J x Kris 
T©'jxh£i§arr3<^ ? 

d;5C&So fc/cU, xf- y 

^■rssrAA^stfPit^n 

awD?a,iurB0u o 

t-yl C6^}ffi<SB»r'B, 
DRAWXfflGMLCSSR 
G&), L(S, U(±h D(T), 
E(£±h F(ST)s G(£TK 
H(£±)©=i7>K£1£xB'fr 

^©V->>ffll5SB^aCBKor 
&U©£-35#? 3n&©=i 
7VKW3B, ®lx.« r R3j 

&&ec3K^h. ss?i*a 

©7i(qllcJiSLfcSHi©»fc'l^ 
&9. !$¥©MoDlc' r = x : j 



175 PUTSPRITE0. (0.216 
6) . 1 -BF:PRINT#1 ,"STAG 

176 IFINKEY$< >""THEN1 
64.16) .1 .BF: P=0:FORI= 
FA$< "0"ORAS>"9"THENI= 
. A$; :P=P*10+VAL (AS) :N 
176ELSECLS 



) : LINE(80.24)-(16. 1 
E = " ; 

76ELSELINE(80.24)-( 
1T02: A$=INPIJT$( 1 ) : I 
1-1 :NEXTELSEPRINT#1 
EXT: IFP< 10RP>STTHEN 



jnv^LMmmT- 


-$ ffiL^»67^-y 




10>GY10 


20>e9L0 


30>YU50 


40>f 6Y1 


50>6nD1 


60>Vqr1 


70>PaY0 


80 >pKG0 


90>AZ20 


100>HQW0 


1 10>PA30 


120>TGL5 


130>w230 


140>MQY0 


150>A530 


160>0qA0 


170>d200 


180>vm71 


190>mf s0 


200>PXa0 


210>hN60 


220>4U60 


230>ML40 


240 >Af 40 


250>0920 


260>PwE0 


270>ouU0 


280>M200 


290>L4A0 


300>KT30 


3 1 > 1 4 J 1 


320>LmC0 


330>KT30 


340>gdH1 


350>qhH0 


360>MaD1 


370>t id1 


380>h9R0 


390>0ZQ1 


400>xT00 


410>DYD0 


420>T4O0 


430>r JG0 


440 >oA40 


450>Y450 


460>R350 


470>iV50 


480 >4090 


490>L2Z0 


500>wU1 


510>cZI0 


520>7p10 


530>YNZ0 


540>80s1 


550>iR80 


560>cH80 


570>gQ90 


580>8c80 


590>c850 


600>Q050 


610>g250 


620>Q550 


630>n450 


640>bw40 


650>Iu40 


660>qv40 


670>Jw40 


680 >i 150 


690>xt40 


700>3t40 


710>ms40 


720>1050 


730>N150 










izmBfi^ifr-rc^au n 



m^m a v y k ciss^n, s 

nv>K©S1"75lql : &A(llllE) 
Z]^>KI-I5«^n5©r\ G 
M l_ ©Ttsll:: r S4 AO j £»U 



vtzt 



FLORIDA/ 



:se«) f 

DA, FL 
A. FLO 

FLOR I 
LOR I D 
OR I DA 
R I DA, 
DA, F 
DA, FL 
A, FLO 



LOR I DA, F 
OR I DA, FL 
R IDA, FLO 
DA, FLOR 
A. FLOR I D 
FLOR I DA 
FLOR I DA, 
LOR I DA. F 
OR I DA. FL 
R I DA. HE 



LOR I DA. FLORIDA. FLOR I 
OR I DA, FLOR I DA, FLOR I D 
R I DA, FLORIDA, FLORIDA. 
DA. FLORIDA. FLORIDA, F 
A. FLOR I DA. FLOR I DA. FL 
. FLORIDA. FLORIDA, FLO 
FLORIDA. FLORIDA. FLOR 
LOR I DA. FLORIDA. FLOR I 
OR I DA. FLOR I DA. FLOR I D 
RE I COME.' 
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HE SUPER * 



■SPJtWW 



RAM8K 



tmrfiitmi-y 



10 COL OR 15, 4.1 :SCREEN2,3:DEFINTA- 

GRP:"AS#1 :A= 14336: FORI=0TO9 : READA 

0TO31 : VPOKEA,VAL("&H"+MID$(A$, J*2 

A = A+1 :NEXTJ - I 

20 FORI=0TO7:K= (RND( 1 )*7)*30:FORJ 

IRCLE(K+J*10,I*13+2),7,14:PAINT(K 

, 1*13+2 )> 14 :CIRCLE(K+J*1 0-1 ,1*13) 

AINT(K+J*10.I*13).15:NEXTJ,I 

30 LINE (0.1 37) -(255. 191) , 12.BF:DR 

1BM100.136U5 0R100D50L100U51C5L20E 

0L130":PAINTM01 .135) > 1 1 .BF:PAINT 

>5:FORI=0TO80STEP2:LINEM 10+1,55) 

1 .75,85) ,7:NEXT:R=RND(-TIME) 

40 LINE (120, 96) -(180- 126), 15, BF:D 

20.96C1R64D32L64U32D15R64U15L32D3 

5 LINE (92,20)- ( 188,27) , 14,BF:LIN 

)-(188, 17) ,1 ,BF:COLOR1 

60 DRAW"BM10 0,20":PRINT#1 ."SCORE" 

:DRAW"BM100, 1 0" : PRINT* 1 , "HIGH" : PU 

1 . (200. 103) .8, 9: PUTS PR I TE2, (202, 1 

70 L = 1 :U = 0:W = 50 

80 W1=W:GOSUB410:N=0:LINE(0,137)- 

1 ) . 12.BF: PUTSPRITE0, (8, 104) . 9.0:L 

8) -(80. 55) . 6.BF : COLOR 1 :DRAW"BM16, 

NT#1 ,USING"LEVEL *#" ;L 

90 PUTSPRITE3, (0,208) :G=RND(1 )*5: 

0,150)- (163, 157), 12,BF:GOSUB330: I 

N190 

100 COLOR 1 : DRAW" BM 100 , 150" : PRINT* 



'c/"-t07 c £7 



iKik, 



:GOT025 
i (DX-IM 
. (DX. 10 



fc*h») " , (G-1 )* 
1 10 S0UND7,56:PLAY"V1504L32CEG" 
120 FORI=0TOW:S=STICK(0) +STICK(1 ) 
2-1THENGOSUB400:ONGGOTO150. 1 60 , 1 7 
130 IFSTHENBEEP:GOTO350 
140 P=(P+1 )MOD4:PUTSPRITE0, ( DX , 10 
:NEXT:GOTO350 

150 D1=-8:DY=104:FORI=0TO16:PUTSP 
DX+I ,DY) , ,3:DY = DY + D1 :D1=D1+1 :NEXT 
16:PUTSPRITE 0, (DX, 104) . ,0:GOTO25 
160 PUTSPRITE0, (DX, 104) , ,4 
170 FORI=0TOW¥2: PUTSPRITE0 
+IM0D2) , .6:NEXT:PUTSPRITE0 
OTO250 

180 PUTSPRITE0, (DX, 104) , , 5:GOT025 
190 X=200:Y=100:X1=RND(1)*8+2:Y1= 
200 G=RND( 1 )*2: I FG=0THENCOLOR1 : DR 
0,150":PRINT#1 , "SfctMt! !" 
210 X=X-X1:Y=Y+Y1:Y1=Y1+1:S0UND8, 
D1 , 1 :SOUND0, Y : IFDX >6AND-STR IG ( ) - 
)THENDX=DX-6: P=1 -P 

220 PUTSPRITE0, (DX, 104) . .P*2:PUTS 
(X,Y),6,8:PUTSPRITE4,(X,Y),15,7 
230 IFY1 >7THENIFABS(DX-XX17THENP 
E0, (DX.97) , ,3:S0UND7,7:S0UND8. 16: 
31 :SOUND12. 15:SOUND13.1 :FORI=0TO3 
6.31-1 :NEXT:S0UND7, 56 : PUTS PR I TE 3 . 
: IFGTHENN = N+1 :SOUND8. :GOTO250ELS 



OPEN" 
$:FORJ= 
+ 1 .2) ) : 

=0TO3:C 
+J*10+2 
,6,15:P 

AWS4C1 
30R80F3 

(99,84) 
-(80+1* 

RAW"BM1 
2" 
E(92. 10 

:C0L0R3 
TSPRITE 
04) .1 ,9 

(255,19 
INE18.4 
48" :PRI 

LINE(10 
FG=0THE 

1 ,MID$( 
6+1,6) 

:IFS=G* 
0, 180 

4) , ,P/2 

RITE0, ( 
: DX=DX+ 



OD3.104 
4) , . 0:G 



:P = 
AW"BM10 

15:SOUN 
STRIG ( 1 

PRITE3. 

UTSPRIT 
S0UND6. 
1 :SOUND 
(0.208) 
E350 



240 IFY>104THENSOUND8.0:GOTO90ELSE210 

250 COLOR15: DRAW"Bl y l10 . 1 60" : PR I NT* 1 . " tit 

I Mirwf*!":U=U+5:W*W-1 

260 IFG< >1THENFORI = 0TO16:PUTSPRITE0, (DX + 

I, 104),, (I MOD 2)*3:FORJ = 0TOW:NEXTJ , I : DX 

= 0X4-16 

270 FORI = 0TOW:NEXT:LINE (100, 160) -(212, 16 

7) . 12,BF:IFDX>176THEN280ELSE90 

280 GOSUB330:PLAY"S0M20 00O5L16CD.E.FG8AB 

BB06C" , "S0O6L16CD.EFG8B. BBB07C" 

290 LINE(0, 137) -(25 5, 191 ) , 1 , BF : PUTSPRITE 

3,(65,135),6.8:PUTSPRITE4,(65,135),15.7: 

T=N*20:COLOR15:DRAW"BM100, 1 50" : PR I NT* 1 . U 

SING"* # = *##" ;N;T:U=U+T:GOSUB330 

30 COLOR10:DRAW"BM48. 170": PRINT* 1,"LEVE 

L CLEAR BONUS" ; L*20: U=U+L*20 :GOSUB330 

310 L=L+1:W=W1-5-5*(W=10):FORI=0TO1:I=1+ 

PLAY(0) :NEXT:FORI=0TO16:PUTSPRITE0,(DX.1 

04) , ,P:DX = DX + RND(1 )*3-1 :P= (P+1 )MOD4: IFRN 

DM ) >.6THENGOSUB400 

320 NEXT :C0L0R7: DRAW" BM20 0, 138" :PRINT#1 , 

"tut!" :GOSUB400:GOTO80 

330 LINE ( 148,20) -( 188,27) , 14. BF: LINE ( 148 

. 1 ) - ( 188. 17) .1 ,BF:IFU>VTHENV = U 

340 COLOR10:DRAW"BM148, 1 0" : PR I NT* 1 . US ING 

"####" ;V:COLOR 6 : DRAW" BM1 48 , 20" :PRINT#1 . 

USING"****" ;U:RETURN 

35 GOSUB330:LINE (112, 87)- (186.94) . 1 .BF: 

PLAY"V1504L8E.CDDC" . " V1 404R32L8E . CDDC" ." 

V1505L32AGAGAGGEFEFEDCDCDC" 

360 IF-PLAY(0)THEN360 

370 C=1-C:COLOR3 + C*5:DRAW"BM1 16.87" : PR IN 

T#1 , "Utt b-3#< ! J " :PUTSPRITE0, (DX. 104) , . 

380 IFRNDM ) > . 6THENGOSUB400 

390 IFINKEY$=CHR$(13)OR-STRIG(3)THENLINE 

(11 2,87) -(186. 94) ,1 1 , BF : GOTO7 0ELSE370 

400 PUTSPRITE0, (DX. 1 04) . . 1 :SOUND1 . 1 :SOUN 

D3. 1 :SOUND8. 15 :S0UND9, 1 5:SOUND6,31 : SOUND 

12,8:SOUND13. 1 : FOR J =0TO1 1 STEP2 : SOUND0 . 3* 

J:SOUND2.2*J :S0UND8.32-J :S0UND9.31-J:NEX 

T:RETURN 

410 F0RI=DXT08STEP-1 :PUTSPRITE0,(I.104), 

9. (IM0D3) : NEXT: DX=8: RETURN 

420 DATA 0000000000000000615F3F3F3F31383 

80000000000C0F0DCFCF0C0C0C0C0E0E0 

430 DATA 0000000000000000C15F3F3F3F31383 

80000000000C0F0DCFCF0D0C0C0C0E0E0 

440 DATA 0000000000000000C15F3F3F7F61737 

300 00000 000C0F0DCFCF0C0C0C0A030 10 

450 DATA 000000000000000000C1 5F3F3F77E0C 

0000000000000C0F0DCFCF0C0C0F07818 

460 DATA 0000000000000030C1DF3F3F3F30383 

800 00000 00C0F0DCFCF0C0C0F83C80C0 

470 DATA 000000000000000001078F5F1F3C383 

C00000000C0F0DCFCF0D0C0C0C0C0E0E0 

480 DATA 00000000000001 0001 1 B17070706070 

70000C0F0DCFCFCE0E0FCDCC0A0000080 
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490 DATA 000000000000607F3F7F60000000000 

000000000000006FEFCFE060000000000 

500 DATA 0000000000070F0F0F0F0F070000000 

00000000000E0B0D0D0F0F0E000000000 

510 DATA 030F020303002F37000301 030202020 

5C0C0C080 00C0C040C0C0 0C0C0C0C0C0 
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OPFARAI SPECIAL 



ES32/2+VRAM128K BY SSR 



Byft-yi'TS&viii 



► S^73li41^-y 



10 COLO 
"GRP:"A 
:F0RI=1 
.7-1 ,1 + 
0UND8, 1 
20 SETP 
5.B:F0R 
SET:PRI 
30 SETP 
,0)-(I, 
=5:F0RI 
B:C=C+1 
Q=106:V 
40 FORI 
X,Y)-(P 
=3ANDV< 
=X+V: Y= 
(99,77) 
= C+1 



R15>0.0: 

SI :COLOR 

TO7:C0LO 

4:PAINT( 

6 

AGE.0:CL 

I=5T012: 

NT#1 , "YO 

AGE. 1 :CL 

211 ) >4:L 

=0TO27:L 

+(C=11 )* 

=0:W=0:C 

=0TO9:S= 

.Q) .3-(I 

4) :W=W-T 

Y+W:COPY 

.0:IFPOI 



SCREEN5 . i 
=(12.7.0. 
RMI+4. I , 
8.8) .1+4: 



0:DEFINTA-2:OPEN 
0) rSETPAGE ,2:CLS 
I .0) :CIRCLE(8.8) 
NEXT:S0UND7.55:S 



S:LINE(98.76)-(158. 136) . 1 
COLOR I :PSET(78-I .47) ,0.TP 
PPARAI SPECIAL" :NEXT 
S:FORI=0TO255STEP4:LINE(I 
INE(0.I)-(255,I) .4:NEXT:C 
INE( I , I ) - (255-1 .21 1-1) .C, 
7:NEXT:X=128:Y=106:P=128: 


STICK(0):T=STRIG(0):LINE( 
=9)*9:V=V+(S=7ANDV>-4)-(S 

(W>-4)*2-(W<4) :P=X:Q=Y:X 
(X-29.Y-29)-(X+29, Y+29JT0 
NT(X.Y) >5THEN60ELSENEXT:C 



50 COPY (0.0) -(16. 16) .2T0(RND(1 )*239,RND( 

1 )*195) , .TPSET:GOTO40 

60 LINE(X.Y)-(P.Q) .3:SOUND12.255:SOUND13 

,9:FORI = 0TO21 1STEP2:COPY(0.I)-(255.I) . 1T 

0(0.1) >0:COPY(0.211-I)-(255,211-I) ,1TO(0 

,211-1) ,0:NEXT:SETPAGE ,0 

70 H=H-(H<C)*(C-H) :FORI=5TO12:PSET(98,10 

0-1) ,0.TPSET:COLORI :PRINT#1 . "GAMEOVER" : P 

SET (104. 116-1) . 0.TPSET: PRINT* 1 . USING" SC 

###";C:PSET(94,124-I) , , TPSET : PRINT#1 ,US 

ING"HI-SC ###" ;H:NEXT: POKE -869, 1 :GOTO20 



mtkomx* 
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S*3^T 



[SSR1SSRUW/ ifflM^7V©*SB(8SBB)ISK<roi7@lS 

*\jt\.\1ttt£, tC5'CBJ;U<!:glclf<0MSXfeCOCk-Mts^ 
i^Ud;5&:SttCfr*0Sbfc(73^P5B#?a o FMS;i#/3^3fin 
5£U5fcffl) tltoC^©*, If <fflMSXBJf ^lirSS^dSoZfr 

nsf^tffl/c(aictsorLifc©* i sfrofc c t;5iattr5ya. * 

Ufcli^tfULir-Tct. ao^-7tt(S/j:*-lcSA©=E,Zfflg1>:;ic**o7c„ 
ffli&Mtfr-ofctf),,— P. S. -?+7|->2lV ©Gtt/u&lV # 




yn? 3 ummmT-9 mwm^—y 



10>Y3G2 
50>LjO0 



20>2xA1 
60>DAB2 



30>X2G4 
70>HZF3 



40>L7r6 






REMOTE TOWN 



CS32/2+VRAM64K BY YOSHIX 



► i^TO(i42^-y 



10 '♦♦♦ REMOTE TOWN ♦♦♦ YOSHIX 1991.5 

20 COL OR 15 >0>0:SCREEN5.2,0:CLEAR500 0:MAX 

FILES =2:R=RND(-TIME) : DEF INTA-Z : OPEN"GRP : 

"AS#1 : DIMM (19. 37) , K(79) ,VD(15) ,G(239) :DE 

FUSR=342:ONERRORGOTO710:PSET(88-72) :PRIN 

T#1 ,"ii£->ti->Zb" 

30 FORI=0TO11 :READI$: J=0:Q=0 

40 IFQ>115THEN70 

50 J$=MID$(I$,J+1,2):IFASC(LEFT$(J$,1))< 

97THENW=VAL("&H"+J$) : VPOKE&H80 00+ I* 1 28+Q 

. W: J=J+2:Q=Q+1 : GOTO40 ELS EE=ASC ( LEFTS ( J$ , 

1 ) )-96 

60 VPOKE&H8000 + 1*1 28 + Q. W:E = E-1 :Q=Q+1 :IFE 

THEN60ELSEJ=J+1 :GOTO40 

70 NEXT 

80 FORI=0TO1 :READI$:FORJ=0TO23:VPOKE3072 

0+1*32+ J , VAL("&H"+MID$(I$, J*2+1 .2) ) :NEXT 

J.I:FORI=0TO4:READSY(I) : FOR J=0TO1 5 : READK 

(1*1 6 + J) :NEXT.J.I : FORI = 0TO1 5 : READVD ( I ) , J . 

0. W:COLOR=(I. J.Q.W) :NEXT 

90 '••• TITLE ••• 

100 CLS:YR=0:M!=2000:G=0:D=0:X=6:Y=7:BK= 

0:LF=0 

110 PSET(72.64) :PRINT#1 ,"<REMOTE TOWN>": 

COLOR11 :PSET(64,88) :PRINT#1 ,"[SPC: START 

" :PSET(64. 104) :PRINT#1 ."[RET] DATA LOAD" 

:COLOR6:PSET(80. 128) : PRINT* 1 ."YOSHIX 199 

1" :A=USR(0) 

120 IFINKEY$=CHR$(13)THENGOSUB560:GOTO50 

0ELSEIFSTRIG(0)=0THEN120ELSEGOSUB560 

130 '••• MAKE MAP ••• 

140 COLOR15,0:CLS:FORI=0TO37:FORJ=0TO19 

150 IFLFTHEN170 

160 IFJ=I¥2+3THENM( J , I ) =5- ( I =7 ) ELSEI FRND 

(1 )*99<1THENG=G+3:M(J.I)=RND(1 )*4+8ELSEM 

(J.I)=RND(1 )*2 

170 COPY(M( J. I)*12.0)-(M(J,I)*12+11.11), 

1TO( J*12+(IMOD2)*6 + 4.I*4) , , TPSET : NEXT J . 

I : LINE C8 . 161 )- (247, 210) > 1 5 , BF : COLOR0 . 15: 

PSET( 16. 164) :PRINT#1 ."REMOTE TOWN YO 

SHIX 1991" 

180 LINE (9. 174) -(246.209) . 8 . BF : FORI =0TO2 

:COPY( 1*16+ 192.0) -(1*16+206,7) , 1TO(16.I* 

8+176) >0:NEXT 

190 COLOR15.8:RESTORE70 0:FORI=0TO3:READI 

$:PSET(96.I*8+176) :PRINT#1 ,I$:NEXT 

20 '••• COMMAND ••• 

210 PLAY"S9M999905E8C8" 

220 LINE (16.200) -(87,207) , 8 , BF : GOSUB520 : 

PUTSPRITE1 , (0,216) 

230 S=STICK(0) : IFSTHENGOSUB560 : I FS=30RS= 

7THEND=(D + 4)M0D8ELSEIFS = 5THEND=(D+1 )M0D8 

ELSEIFS=1THEND=-(D-1)*(D>0)-(D=0)*7ELSE2 

30 

240 PUTSPRITE0, ( (D¥4)*80+88, (DM0D4)*8+17 

5) . 15,0: IFSTRIG(0)THENGOSUB560:A = USR(0) : 

0N-(D-3)*(D>3)- (D<4)GOTO260,330,450 ,480 



250 GOTO230 

260 S=STICK(0):IFSTHENY=Y+(S=5)*(Y<37)-( 

S=1)*(Y>0):X=X+(S=3)*(X<19)-(S=7)*(X>0) 

270 PUTSPRITE1 , ( X*1 2+ ( YM0D2 ) *6+3 , Y*4+3) , 

15.1:1 =M(X.Y):J = K(D* 16+1): PRESETM6. 200) 

:IFJTHENPRINT#1 . US ING"ttUtf###*0" ; J ELSE PR I 

NTtl ,"£toO " 

280 IFINKEY$=CHR$(27)THENGOSUB560:GOTO22 

0ELSEIFSTRIG(0)ANDJANDJ*10<=M!THEN300ELS 

E260 

290 '••• PUT CHR ••• 

300 M!=M!-J*10:G=G-(D=4)*20:BK=BK-(D=3)« 

3: IFM(X. Y) >7ANDM(X, Y)< 12THENG=G-3 

31 GOSUB560:M(X.Y)=SY(D) : M=X : N=Y : GOSUB5 

30:GOSUB520:GOTO260 

320 '••• NEXT ••• 

330 FORW=0TOBK+9:M=RND( 1 )*20:N=RND( 1 ) *38 

:V=1:Q=M(M,N) :FORI= ( N >0 ) TO- ( N< 37) :FORJ=( 

M>0)TO-(M<19) :V=V+VD(M(M+J,N+I) ): NEXT J, I 

340 IFQ=5ANDRND(1 ) *80< 1 THENM ( M . N ) =6 : GOSU 

B530 

350 IFRND(1)*200< 1ANDQ<3ANDG >99THENBK = BK 

+2:M(M,N)=15:GOSUB530:GOTO380 

360 IFV>20THENIFQ>7ANDQ<12THENG=G+9:M(M. 

N)=13:GOSUB530:GOTO380ELSEIFQ=13THENG=G+ 

20:M(M,N)=14:GOSUB530:GOTO380 

370 IFV>3ANDQ=2THENM(M,N) =RND ( 1 ) *4+8 : G=G 

+3:GOSUB530 

380 PSET( 16.200) :PRINT#1 , USING "WAIT****" 

;BK+9-W:NEXT 

390 G(YR)=G/20:YR=YR+1: IFYRMOD3=0THENM ! = 

M! +G*3+1 00 

400 IFYR<240THEN210 

410 '••• GAME OVER ••• 

420 PSETM6, 200) :PRINT#1 , "PUSH RET":A = US 

R(0) : FOR 1=0 T0 1 : 1 = - ( INKEY$ = CHR$ ( 1 3 ) ) :NEXT 

430 PUTSPRITE0, (0,216) : COLOR 1 5 , : CLS : L IN 

E (7,0) -(248, 151 ) , 15>B:FdRI=0TO239:LINE(I 

+ 8- 150 -G( I) ) - ( 1+8 , 1 50 ) , 11 : NEXT : PSET ( 56 , 1 

75) : PRINT* 1 , "tfiOtftlZiT^ L6" : PSET (70 , 1 90 ) :PR 

INT#1 ,USING"L VV A.^7#####0 0EA.";G:FORI=0TO1 : 

I=-STRIG(0) :NEXT:GOTO100 

440 '••• DATA SAVE ••• 

450 PSET (16, 20 0) :PRINT#1 ,"SAVE(Y/N)" : A=U 

SR(0) 

460 I$=LEFT$(INKEY$+" " , 1 ) : ON INSTR ( "Nn Yy 

",I$)+1GOTO460, 220, 220: OPEN" R-TOWN.DAT"F 

OROUTPUTAS#2:FORI=0TO37:FORJ=0TO19:PRINT 

#2,M( J, I) :NEXTJ,I:PRINT#2,YR,M! ,G,BK:FOR 

I=0TOYR:PRINT#2,G(I) : NEXT : CLOSE#2 : G0T022 



470 '••• DATA LOAD ••• 

480 PSET ( 16,200) : PRINT* 1 , " LOAD ( Y/N ) " : A=U 

SR(0) 

490 I$=LEFT$(INKEY$+" " , 1 ) : ONINSTR ( "Nn Yy 

",I$)+1GOTO490. 220.220 



< 
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5 00 OPEN " R- TOWN. DAT" FOR INPUT AS#2 : FOR I = 0T 

O37:FORJ=0TO19:INPUT#2,M( J , I ) : NEXT J . I : IN 

PUT#2, YR,M! , G,BK:FORI=0TOYR: INPUT#2,G( I ) 

:NEXT:CL0SE#2:LF=1 : GOTO 140 

510 '••• SUB ••• 

520 C0L0R15,8:PSET(32,176) :PRINT#1 .USING 

"##5##B"; (YR¥12+1 )MOD100; (YRMOD121+1 : PSE 

T( 40. 184) :PRINT#1 , US I NG "######" ;M! :PSET( 

24,192) : PRINT* 1 . USING "D#####0 0" ;G: RETURN 

530 SETPAGE, 1:LINE(0.13)-(35.50).0,BF:SE 

TPAGE.0:FORI=(N>0)TO-(N<37)-(N<36) :FORJ= 

(N>0)TO-(M< 19) :COPY(M(M+J ,N+I)*12,0)-(M( 

M+J,N+I)*12+11.11),1T0(J*12+( (N+I)MOD2)* 

6+12. 1*4 + 20) ,1 ,TPSET:NEXTJ,I 

540 COPY( (NMOD2)*6+12,20)- t ( NM0D2 ) *6+23 , 

31 ) . 1T0(M*12+ (NM0D2)*6+4.N*4) > .TPSET 

550 RETURN 

560 FORI = 0TO9:SOUND8. 13:SOUND1 ,0:SOUND0, 

1*1 5 +99: NEXT: SOUND8. : RETURN 

570 '••• DATA ••• 

5 80 DATA00l0EEEaE000dF100FFbF8888Fa88FFa 

F888F88F88b8F88a.0 000 E EEc E 000 1 1E00F1008 

88F88aF F b88a F8a8FFF8FFF88a8F 88a >0 0y 040 0* 

0EE00 0a3FFEEEaE11301 1 EEEE0F 1 008Fb88F88F8 

8b8F888FaFFF888a8F88a 

5 90 DATA00 040 0w45C04C00g0EE000d0EE00 0*0E 

EEaE000EF3FFF11131EaEEaE1F100FFbF8FFa8Fa 

FFb888F88F888aFF88a,0 045C00040 00t5CC45C0 

0gEEaE000b0EEEaE000z0EE000bEEc003FEF3F13 

1E13FEEEE1 1 EF 1 00888F88aF8b88a8Fa888FFF F8 

88aF8a88 

60 DATA00 5CC5545C00b0 5 5000c0BB0 00c01 1 

0c4CC4CC00b01 B000bFFEEa00a0EEE11FEEEE000 

7667B000c0770 00b0EE1B000c0EE0 00b0EEEaE0 

0aFFEEa1 1 00EF3FEF1 E1 31 EFFEE 1 EEEF 1 E0888F8 

8aF8c888FF88FFFb888F888F88 

610 DATA00C3445 5CC00a054555 5000a0BBBaB00 

0a 01 1 1a100 0aBC5A5 53C0 0a01FF1BB0 0a77FF1 1 

B0000FF111FFF1 100077767BB000a01 1F7AA00 

EEE111EE000a0EEE11100 0aEEc00a3FFF11 13003 

FEF3F131E13FFEFEEaF1E0888F888F88FF8FF888 

8F88a8F88F888F888aF8 

620 DATA05 5345CCC3500 555 5C5455500BBBcB0 

111c100CBB55aA5C0011F11F1 1BB001FF771 11BB 

00FF1333FF1100BF777677BB00B11aAAaB0EE1 1a 

EE11 100BBFF76711B00BFFEEa1 1B0 0BEF3F131EB 

0EF3FEF1E131E3FFFFEEEaE188hFF88aF888F888 

d 

630 DATA555A5CC53555a5C55aC545BBe1 1eCCB5 

B77775CCB1 11FF1FF1 1BB177FF11F1 1B533311F3 

3335BBFFF77EEBBBaF1 12FFAABBFF1 11EE1 1 IBBa 

B7767771BBa33FF1133BBa3FEF1E13BB3FEF3F13 

1E13FF3FFEEEE11 1 F8a8F888Ff 88F888F88F88c 

640 DATA05 55CC35A5500 545 54a555 00BBBcB0 01 

11c100C5 5B7777CC00BB1 1 1 F 1 1 F 1 00BF3771 11F1 

00FF1555FF1 1 0BBF3FFEEBB00BBF222FEEB00FF 

1BFFF1BB0 0BB7FF77EBB00BFF33a1 1B00BEF3F13 

1EB0 0F3FEF1E13100FFF3FE1 1 1 1 0F8d8FFF8F88F 

88Fe88c 

65 DATA000 55A555000a0 555C5500 0a0BBBaB0 

0a 01 1 1a1000a0 5B5 5CC0 0a0BB1 1FF000a033F1 1 

F000a0555a5 00 0a0BBFFEB000a0BF222B00 0a0BB 

BFFB000a0FFFFEE000a0FFF111000a0FEF1E1000 

a0F3F131000a0FFF1110008F88F8a8Ff88FF88FF 

8F88c 



660 DATA00a0A5000c055000c0BB000c011000c0 

CC000c0B100 0c0F1000c055000c0BB000c0FE000 

C0BB000C0FF000C0F1000C0F1000C0F1000C0F10 

0a8F888F88F88Ff F88FF88F88c 

670 DATAC0F0FCFEFCF0C0.030C30408040300C0 

30000000000000000C03008040830C0 

680 DATA2.25.20. , 1 , . . . . 90 . 98 . 1 00 . 1 50 . . . 

,,3.30.25.20.. ....95. 103. 105. 155.....4. 5 

0.45.35... ...115.123.125,175.. ...7.300,2 

95,290. , , . , ,390.398.40 0.450. ..,.12.200.1 
95. 190. ... . .290-298,300,350, , , > 

690 DATA ,,,,,2, 2, 2, 1.6, ,,3, ,,,18. 2,7, 2,1 
,,4,1, 30, 3, 5, 7, 18, ,2, 6, 1,1, 3, 3,1, ,3, 3,1, 
4, 2,, 2, 6, 4, ,1,-2, ,3, 6, 2, 2, 4, 4, 4, 4, 1,7, 7, 

7 
700 

D 

710 '••• ERROR - 

720 CL0SE#2: IFERR = 70THENI$ = "T*<a / 7O) C**A,U 

*jT 7*i7&U" :GOTO780 

730 IFERR = 53THENI$ = "7p-fll/** JO/T^SU" : G0T07 

80 

740 IFERR = 68THENI$ = ""3#>$ ffiZb»S)oC (,7fc":G0 

TO780 

750 IFERR = 660RERR = 67THENI$ = "t v '<;*'?A'* (.^tt 

O" : IFERR = 66THENKILL"R-T0WN .DAT" :GOTO780E 

LSE780 

760 IFERR = 60ORERR = 69THENI$ = "7 x '--r7;'7#* Zfim 

S":GOTO780 

770 ONERRORGOTO0 

780 BEEP: COLOR 15, 2: LINE (239, 190) -(16, 176 

) ,2,BF:PRINT #1 , 1$ 

790 PSET(16,184) :PRINT #1,"8Cfr 4-5 JilTfo" 

: COLOR 15, 0:PUTSPRITE0, (0,216) :A = USR(0) 

80 IFINKEY$=""THEN800ELSEIFERL=500THENR 

ESUME100ELSERESUME180 



DATA£<S?^ i )t>U 6* ktti A,tn , fc* ^1*0tt* 0«o 
eoSA.ttA.tt:> DATASAVE , jT^ZottAtn DATALOA 
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260-310 ^7i2BliW(St 
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777-7 (n30rH*::A) 
670 7.777 h/^7-77 
-7(fT80rii*-3^) 
080 ziV>KAV>7tlfiJ6 
7 f 7 7 7 ©^8<?y3 cfc y'-g 

mimzwtfozfo) 
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S7-7(iT80ri^3&) 
700 =IV>KS7'-7«7 
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710-800 7A7,7777XIC 
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190>31M0 
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210>iE20 


220>BLD0 


230>X4r1 


240>QcT1 


250>FE00 


260>K7A1 


270>iLq1 


280>vIT0 


290>f 0.40 


300>bVv0 


310>QeE0 


320>WO30 


330>gdO2 


340>ct90 


350>IQR0 


360>Qd21 


370>KdH0 


380>F9D0 


390>VJP0 


400>Cln1 


.O2H5 


420>Cvd0 


4307Ro33 


440 >nD50 


450->ZCA0 


460>WMR3 
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480 >J8A0 
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550>M200 


560>8uF0 


570>RI30 


580>L8Z4[}'- : L'>w73t) 


600>YUe4 
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E BADMINTON 



CS3CS32/2+RAM1 8K BY PqlSBfit-fiB 



+f-AKS>S> 



► 58^751*37^-^* 



10 SCREEN1 ,2,0:COLOR7, 1 - 1 : WIDTH32 : KEYOFF 

: CLEAR: DEF IIMTA-Z : ONKE YGOSUB1 40 

20 FORI=0TO4:READA$:FORJ=0TO31 :VPOKE1433 

6+ 1*32+ J . VAL ("&H"+MID$(A$, J*2+ 1 .2) ) :NEXT 

J . I 

30 FORI =0TO5: RE ADAS, A: FOR J =0TO7 : VP0KEA*8 

+J,VAL("&H"+MID$(A$, J*2+1 . 2) ) : NEXT J . I : VP 

OKE8194.160: VP0KE81 95 , 1 60 : VPOKE8204 , 252 : 

VPOKE820 5,240:VPOKE8206>80:VPOKE8207,128 

:VPOKE8208,160 

4 FORI=0TO9:FORJ=0TO2:S$( I . J ) =MI D$ ( " pr p 
p ppqp p p p prpqqppqqrrp rppqpq ppqp 

pprrrr ppqppr rprppq pr r p p pprpprpppppr 
ppqpqqp",I*9+J*3+1,3):NEXTJ,I:GOSUB140 

5 KEY( 1 )ON: FORI = 0TO1 : FOR J = 0TO2 : LOCATE 1 1 
+ 1*7, 6+ J : PRINTS$(P( I ) , J ) : NEXT J , I .-LOCATE , 
9: PRINTS PC (32):LOC AT E11+R*7,9:PRINT"xxx" 
:LOCATE5-21 :PRINTSPC(22) :Q=9:E=R:IFP(R)= 
8THENA$=" SERVER GAME POINT !": GOSUB1 70 
ELSEIFP(R)=9THENGOSUB130 

60 X=68+E*104:Y=98:K=0:L=0: S0UND6 > 30 : SOU 

ND8, 16:S0UND12. 1 : SOUND7 , 23 : PUTSPRITE0 > ( 

X.Y) , 15,0:FORI=0TO1 :I=-STRIG(E) :NEXT 

70 Q = Q+1: L = L + 1:K = K+(-E*2 + 1)*-(K<>0) :X = X + 

K:Y=Y+L :S=STICK(E) : H=- ( Y >40 ANDQ >5AND ( ( E= 

0ANDX< 120)OR(E=1ANDX>120) ) ) 

80 IFS>0THENIFHTHENSOUND13,0:Z=( 136-Y)¥2 

0+12:K= (E=1AND(S>40RS=1 ) ORE =1 ANDS=3 ) *Z - ( 

E=0ANDS=7ORE=0ANDS<6)*Z+(STRIG(E)+1 )*6*( 

-E*2+1)+((S=7)-(S=3))*5:L=((S=1)-(S=5))* 

14+2+((E=1ANDS=3)OR(E=0ANDS=7))*5:E=1-E: 

Q=0:H=0ELSEIFQ>3THENSOUND13>0 :Q = 

90 IFY>104AND( ( X-K >1 27ANDX< 1 29 ) OR ( X-K< 11 

3ANDX>1 11 ))ANDK<>0THENSOUN 013,0 :X=128-E* 

14:K=0:L=0:E=1-E 

100 IFY<140THENPUTSPRITE0,(X,Y),7+H*8,(S 

GN(L)+2-E+1)*-(K<>0) :GOTO70 

110 PUTSPRITE0, (X, 136) , 15:W=-( (X>8ANDX<1 

20)ORX>232) : IFR = WTHENA$ = " POINT" 

:GOSUB170:P(R)=P(R)+1ELSEA$=" SERVIC 

E OVER" :GOSUB170:R=1-R 



nsmyyy 
i , j n-ym 

P(n) S^^-ff-fflTtt-r 

r y—ymofo&yis-i"? 

I ; .n, m) 7K-f>h^^ 



X, Y S/1?SJUDK1 

yycom^ 

AS ;fl,ffl 

E ^ayKTS^U-ff- 



120 FORI=0TO1500:NEXT:GOTO50 

130 AS="V1505L16BAGFGFEDGFEDC4" :PLAYA$," 

R16"+A$:FORI=0TO4500:NEXT:A$=" GAM 

E OVER" :GOSUB170:FORI=0TO1 :I = 0:NEXT 

140 CLS:PUTSPRITE0- , : FORI = 1 9T022 : LOCATE 

2,I:PRINTSTRING$(28,97) ; : NEXT : FORI = 1 5T01 

8:L0CATE16, I:PRINT"h":NEXT:E=0:R=0:FORI= 

0TO1 :L0CATE3+I*19,6:PRINT"PLAYER"+CHR$(4 

9 + 1) :P(I)=0:NEXT 

150 RESTORE240 : FORI = 0TO3: RE ADAS: LOCATE5- 

1 + 1 :PRINTA$:NEXT:LOCATE4,0:PRINT'*THE" 

160 A$=" PUSH SPACE KE Y" : GOSUB1 70 : A$= 

"V1505L16CEDFEGFABGFEDCDEDC4" :FORI=0TO1 : 

I = -STRIG(0) :NEXT:PLAYA$,"R16"+AS:FORI = 0T 

O6000:NEXT:A$=" LOVE ALL PLAY!!":GOSU 

B170:R=0:FORI=0TO2500:NEXT: RETURN50 

170 A$=A$+" ":FORQ=0TO21STEP2:SOU 

ND7,56:SOUND0,50+Q*6:SOUND1 , : S0UND8 , 1 5 : 

LOCATE 5, 21 : PRINTMIDS ( AS , 22-Q , 22 ) ; : NEXT : S 

OUND8.0 :RETURN 

180 DATA 0000001 F1 01 F1F0F0F070003030301 

00 000F808F8F8F0F0E0 0C0C0C08000 

190 DATA 000000010F7F2F170B0502010000000 

00 01 C3EDEEEF4F8F8F8F0F 070 A0602000 

200 DATA 00387C7B772F1F1F1F0F0F0E0506040 

000000080F0FEF4E8D0A0408000000000 

210 DATA 0000000001 02050B172F7F0F01 00000 

0002060A070F0F0F8F8F8F4EEDE3E1C00 

220 DATA 000406050E0F0F1F1F1F2F777B7C380 

0000000008040A0D0E8F4FEF080000000 

230 DATA FFFF000000000000 , 97 , C0C0C0C0C0C 

0C0C0,104,FFFFFFFFFFFFFFFF, 112.000000FFF 

FFFFFFF,113,FFFFFFFFFF000000,114,00FFFFF 

FFF000000, 120 

240 DATA-i — i I ■* I 'I — I n H r-r 

-, -r r- 1 +- r- , r— . , I llllllllll II I II I." 1 — ' 



z yvb-Mmmmiwm 



yact^djjm 



■jyyy=y^y\-x-h^<D 

bo y.y^4v-)W-y£M 
so ^vyyyj^y-ys.m- 
*v"jyy(D&mT 

40 TK-fVhil^fflX^JfFfiJt 



-AtT-A-sPJS 



1S5E y- 



Xxf 



70 vfKJb^iM+i 

BD ya^KIE 

vfMbft^ y*J-(D 
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110 
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IEO 


&rat*> 


130 


sms/^-ATr-K- 


140 


-Sr— AHHftfiK 


150 


wsjus* 


160 


X5SI ^-AX^-K 


170 


X-vtz-yg^+t^' 



180-EEO 7,7^-f SK^-V 







THE 




oti«t. $£f©«rE-*c&o. 
sL/»6nro5*Bi©c5r"r„ 

ASS>S>B7l'x- Sffl/K^L- 
l\, < J f>L/U©"Cy-ACUSL/to 
5iffi©a«[3SANYO©MSXe+o 

s^^cisiwri'Hau— >a>a© 

■oZg>-oZfrtzl)13.&£&iZl^t 

si.sac, xxs^b-<-&©#rtffl 



mmnsmn] 



Hff A8KHI SOFT, 




^P^^AHBfflT 1 - 


■? ffiU7?B67^-y 




10 >GYG0 


20 >3Si0 


30 >sq82 


40 >nL04 


50 >ERL4 


60 >oJG1 


70 >2qF2 


80 >tL79 


90 >XDH1 


1 00 >PtX0 


110 >0AN2 


120 >AS20 


130 >iWW1 


140 >YdW2 


150>V5I0 


160 >CV04 


170 >TTG1 


180>mIX0 


190 >jAY0 


200 >n1X0 


210 >FrY0 


220 >LUX0 


230 >AW82 


240>PLP2 



"2-pyVh. INFORMATION 



7S\W)\j3-*vWlx0^f5 



r 7.^v-fJU?x'y^-y'AjB 1 Z> 
7V5'ACffl«StltNIiffllU±© 
!?Q?=>Atf. EiiCf753$nr 
l.\Sfr$«t8-r57c»fflfc©£<> 

7A5«S3t 

5>t- ji/^x'v^-y-Ajro^p^^A 

«£, 5X©&lUr3C}7S3/uT"R 
UNL/ra*d;-5o 

HffiCB. 0^aSi:f-9ff'i 

?tf-a&L;t35^Etfc^r, mm 

fcbiiorUActo, -ffflfrCBfl 

5^*sxtf>E-s©r. KSSffl-?- 
WSr^rifiEL/cfc^,, 

fc/cU fj9110©«S3Jlx— 9B 

r 7.'<vt'JU? 1 i^^ H 7A J /)^± 
77.^-1z-7©^075IS. WT 

»X <*?©«□ 

SAVE"77-fil/S", A 
mT—ZfOMa 



SAVE"CAS : 77-fJL.S" 

(CSAVEr«lM7&U) 

■JS«E7P^7A^f7SCt:<!:5© 

•'^'Si/T'Jl/xi'y^ltAjB, Ik 
m(Dfl-5Zh>Zl'> : &7a3?htM 

^nC7'7>A^©«iS"C^S7.^-x 
^wguto. REMX^a^cn 

oWSt. -E-©i7©5ilSfflx— 5 
B. S«gftorlyS7©r-;±So 
*fc, ^D^7>A>gf7S;**?fi 

<fc-3Z:tfl.\£A/rRUN0fc£>. 

■ X^t>JI/xi '>^-9-A©HKr 
ffl«U75 

5ftSl/fcU:7P9'^A£P 

-sur<5„ teu a-KUt 

^tRUNBUtfUdt. 
RUNUfc££Bx-?tf*K)o 

rU*7>©'C;iSUcfc^o 

r-t, tuRUNurus^fct), 

fcriUSi:P-l<U&J5tiB"l.U\> 

£. a-Kb"CSfc:?P^AICM 
ERGEU<J;5. 
MERGEro^OSB, XVX2 

tx-7fc33«u;r, 

MERGE"77f JbS" 
SCREENO : W I DTH4D 



9000 ' SPECIAL CHECK SUM 

9010 V=PEEK(SHF676)+PEEK(&HF677)*256 

9020 V1=PEEK(V)+PEEK(V+1 ) *256 : L=V1 - V-1 

9030 VS=PEEK(V+2)+PEEK(V+3)*256 

9040 IF V1=0 THEN END ELSE S=0 

9050 FOR 1=4 TO L : D = PEEK ( V+I ) 

9060 S=S+D*(I-3) :NEXT:A$="" 

9070 FOR 1=0 TO 3:B = 60M3-I) :A = INT(S/B) 

9080 IF A>35 THEN C=A+61 ELSE IF A>9 THE 

N C=A+55 ELSE C=A+48 

9090 A$=CHR$(C)+A$:S=S-A*B:NEXT 

9100 PRINTUSING" ####>& &" ; VS ; A$ : : V=V1 

9110 GOTO9020 

9000>AH50 9010>8I60 9020 >7QD0 9030 >C970 
9040>L040 9050>G560 9060 >8n40 9070>t7E0 
9080>RrP0 9090>cg70 9100>7q60 9110>dE00 



@G0T090D0 
tP-DZ r ^^uvil9j.-y0nh.i 

©JISCB^oSCffllSfflx-^ 

m£&tbz&zo a 

ftO^P^^ASWg-rStSB, 
8U(«DS9fflf-5#IIffl±fr 
6B«MBL-r, MZZUS^Ztft 
S§©r;i«Ud;7o 

©ilKfflx-S'ff-iiorUfcglitf© 



se>sr@^6©if*^< OA^-r, 

Stfa^AtfSSiC&ofcB. 

DELETE9DDD-91 1 D 

?»7br, r 7.'<i/t'JUxi'y^' , 7 

Aj©^P^=>A/fl7^WO»<o 

A^t2-7urB<o 

SS, L\<tLURUNUr*d:5o 

S^/vt»<B'J't"o feU 77tf 

-I58ICS]fEL<&frofc6. 177- 

raisrMP=iur*cfcT> 
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O-E, 



0ztX, «vax « 
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SX <7)XU-y H=#L;L\VB 
W'ExA^-l-'J-y >»/£<, 

-T-AOROMV7 f-<7><* -7 1 

&<»*»<, Jlff&JtA"'1200b P s 
-5?, MSXCfigbf RS-232 



-<-l-'j.'Si8'l-T5ct t)T#3 O-y— A-p-y— ;W, Wt*L«4W/ 



At*S 2400bpslUJ:«)J: *;SI 
t^ftaOiWMlJLx MNPfc^-5 
i»t4><Z>x- Wi7- fr*£ t 



RS-232C-f>3>-:7x-rX+;/lffl : Ex.k 



A<7M±fi6ttr.*,b*"'±/i'fr\ MS 

CRS-232C(7M >i>7x-Z 
fcilffV? K7^t-MSX- 
TERM12800n*f)48IJlcS 
t>%imtXttW.\ZOi r '<Vi& 



73.+-D03-3486-8080 
MSX-SCRIAL 232 
20000f% 




Tl>3 : E7*A 

r-C7 

B03-3827-3620 

PV-A24VM5 

38000PW. 



-TttiiftV 

t^viiam 

ffl<7>FS-CM 




FS-CM 1 "Cfcy hlc A5^r 



SIS«^StH'J/|-5S 
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10 CLEAR300:DEFINTI:CALLMUSIC(1 .0.3.1.1. 

1 ) : CALL VOICE (35. 32. 30. 333. 324, 326) 

20 T=120:PLAY#2."V15T=T;" . " V1 1 T=T ; " . " V1 

T=T;" ,"V14T=T;" , "V14T = T;" , "V9T=T;" , "S0M5 

00T=T;" ,"S0M500T=T;" 

30 A$(0)="L8O5DF+16F+16E16D16R16F16" 

40 A$(1 )="GB-4.B16B16G+2A+F+16E.C4.R16" 

50 A$(2)="DD16D16G16G16G16C16G2CC16C16F1 

6F16F16<B16>F2" : R$="B8S8B1 6B1 6S8B8S8B1 6S 

16SI8" :R$(1 )=R$+R$:R$(2)=R$(1 ) :R$(3)=R$: 

R$(4)="B8B16B16B8B8B4S!16S!16S!16S!16" 

60 A$(3)="F+16D+16FA+16A+16C+C2" 

70 A$(4)="F+C16E16Q4BG+Q8G+2" 

80 B$(0)="L8O3D2":B$="E>E<E>E<E>E<E>E<" : 

B$(1 )=B$+B$:B$(3)=B$:B$="D>D<D>D<D>D<D>D' 

<":B$(2)=B$ + B$:C$(1 ) ="CGC1 6C16GCGC1 6C1 6G 

CGC16C16GCGC16C16G" :C$(2)=C$(1 ) 

90 B$(4)=A$(4) :C$(0)="L16O4BAGFEDD-CL8" 

100 C$(3)="C+G+C+16C+16G+C+G+C+16C+16G+1 

6":C$(4)="F+C16E16Q4BG+Q8G+4F16F16F16F16 

ff 

110 R$ ( ) = " S 1 6S 1 6S 1 6S 1 6S 1 6S 1 6S 1 6S 1 6" 
120 D$(0)="L8O8":D$ = "C<C<C<O>>R2":D$(1 ) 
=D$+D$:D$(2)="07"+D$(1 )+">": D$ ( 3 )=D$ 
130 FORI=0-(I=5)TO4:PLAY#2.A$(I) , B$ ( I ) . B 
$(I) ,C$(I) ,R$(I) ,A$(I) ,C$(I) .D$(.I) -.NEXT 
140 GOTO130 
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10 CALLMUSIC( 

5) :CLEAR6000: 

.A.A.A.A.A.Ai 

D0.38:SOUND1 , 

20 A2="E-FE-D 

+A2+A2+A2+A2+ 

535105"+A2 

30 B2="L1E-B- 

3303"+B2:D1=" 

40 E1="03L1V1 

50 F1="V143A1 

!4SS!16SS! 16S 

16" 

60 G1="S1M400 

EEEE 

70 A3="DDR16E 

="06L16V14353 

A3 

80 C3="CCR16D 

="Q8V1535306L 

"+C3+C3 

90 E3="E-E-R1 

04V14324L16"+ 

100 F2="S16S1 

6R16S16S16S16 

6EER16EER16EE 

1 10 A3="05L8B 

B3="V14314"+A 



1.0,1.1.1.1.1) :CALLPITCH(44 
DEFSTRA-L:A="T180":PLAY#3.A 
A.A:S0UND7.49:S0UND6.1 :S0UN 
1 :S0UND8. 1 : CALLTRANSPOSE ( 7 ) 
A2="06L16"+A2+A2+A2+A2+A2 
A2+A2+A2+A2+A2+A2+A2:A1="V1 

AF" : B1 ="V1 43304" +B2:C1=" VI 

33V1105"+B2 

434E-B-AF" 

5R1R1SS!4SS!4SS!4SS!4SS!4SS 

SM6SSM6SS! 1 6SS ! 1 6SS ! 1 6SS ! 

0O3L4R1R1EEEEEEM6000L16EEEE 

-E-R16FFR16E-E-R16DE-F8" : A2 
"+A3+A3:B2="06V12L1635"+A3+ 

-D-R16DDR16D-D-R16CD-D8" : C2 
16"+C3+C3:D2="L16Q8V1 133306 

6EER16FFR16EER16E-EF8":E2=" 

E3+E3 

6R16S16S16R16S16S16R16S16S1 

R16":F2=F2+F2:G2="EER16EER1 

ER16":G2="L16M4800"+G2+G2 

-2.E-A&A2.B-AA-2.E-G-&G-1" : 

3:A3="V14305"+A3 



V>©^S^330^t^-StBBfc„ 

yyyyyjo^ot^n-DtzP-Dtsa) 
ffgoriax>7t?*i9;SL.rLi*-rA\ 

£>fC7 L >7$%BlEV~ : S>tiHZfo-5Z 

*;iM;6&<r-rc<fc5cssTSM 



MLffCSgoruSfo MML^rg 
©JffWCL-*^ 

n\mju-yms.m i bju-?$*s 

x.S£> 5Mori«f, &tzfcU 

iit-yizAz^tbtztz. >v-y<D 
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iflft 



120 C3="R8E-8F 
R16" :C3=C3+C3+ 
130 D3="E-E-D- 
3+D3+D3:E3="V1 
140 F3="*V15BB! 
16BB! 16BB18BB! 
+F3+F3 

150 A4="L806E- 
-16G4A-4B-4>C4 
160 C4="R8A-8B 
16":C4="L1605" 
170 E4="A-A-G- 
4 + E4 + E4 

180 A5="L806E- 
16F4G4A-4B-4" 
190 G3="M2000L 
EM2000EE8E8M30 
G3 + G3 

200 PLAY#3.A1 , 
PLAY#3.A2» 
PLAY#3.A3, 
PLAY#3.A3. 
PLAY#3.A4. 
PLAY#3,A5> 



210 
220 
230 
240 
250 
260 



R16<B->R16F8G-R16E-R16<B-> 
C3+C3:C3="L1605a32V13"+C3 
E-R8E-D-E-" :D3="L803"+D3+D 
4a4" + D3:D3 = "a33V13'' + D3 
8BB!16HHH!16SS!16BB!16HHH! 
8SSM6BB! 16HHH!8":F3=F3+F3 

2.<A->D-1E-16D-16C2. .C16<B 

-R16E-R16B-8>CR16<A-R16E-R 

+C4+C4+C4+C4 

A-R8A-G-A-" :D4="L803"+E4+E 

2.<A->F1F16E-16D-2. . D-16E- 
1 6E8EM600EM3000EM2000EM600 
0EM2000EM600E8" :G3=G3+G3+ 

B1 >C1 .D1 -El »F1 .61 
B2.C2-D2.E2.F2.G2 
B3.C3.D3.E3.F3.G3 
B3,C3,D3,E3,F3.G3 
A4,C4,D4,D4,F3,G3 
A5,C4.D4.D4,F3,G3 



GOTO 210 



Jir^UtoSS^LfcA/MA^:/* 



ft$ 



IKOEI MUSIC 






mm TEN (18ft) 



W— A£a.— Vv9 



V— A = n. - V -y ©IFJSM 

uftEno x n 7-* -< ©serosa^ 

&t)-tt(@3B©^JU-Sei: 



U XA©iSl^fc*x.S)&© 



10 COLOR 15, 0.0: SCREEN 1 : WIDTH32 : KE YOFF : CL 
EAR1000 

20 L0CATE6.9:PRINT"^7»U«E*y 

21 '•••• MSX2+ 30 9-<Mb 

22 'CALLKANJI1 : C0L0R1 5 , , : SCREEN0 : WIDTH 
40:KEYOFF:CLEAR1000 

24 'LOCATE 15. 4: PRINT"*S»q*Ci.ti*T»a 

= InnToWJ =" 
30 CALLMUSICd .0.1,1.1.1.1.1) :CALLVOICE( 

336,ai6,a33,a3,ai6,a0) 



40 PLAY#2,"T120V1 1Y32.32" , "T1 20V 1 3Y33 , 32 

","T122V14" , "T120V12Y35.32" . "T1 20V 1 2Y36 , 

32", "T 120V 9Y37.32" . "T120V13A4" 

5 POKE&HFA2C.84:POKE&HFA3C,30:POKE&HFA4 

C,24:POKEFA5C24 

90 '•••• 

100 A0$="O5L16C8FQ7GR16A-R16GR16FR16Q8C& 

C8<A-8B-4>E-8.C&C2" 

1 10 B0$ = "O3L16G8GF>C<GR16GR16GFOC<GFCB- 

8B-F>E-<B-R16B-R16B-FE->E-<B-FE-" 

120 C0$="O2L16F8. >CC8.<FF8. >CC8.<FG-8. >D 

-D-8.<G-G-8.>D-D-8.<G-" 

130 A1$="C8FQ7GR16A-R16GR16FR16GR16Q8A-& 

A-8B-2&R>C4" 

140 B1$ = "G8GF>C<GR16GR16GFOC<GFCF8FE-B- 

FR16FR16FE-<B->B-FE-<B-" 

150 C1$="F8. >CC8.<FF8. >CC8 . < FE-8 . B-B-8 . E 

-A-8. >E-E-8.<A-" 

160 A2$="<A-4G4F4E-4C4&CQ7D-8E-<Q8B-2" 

170 B2$="04A-FC<A->GE-<B-A->FD-<A-F>E-<B 

-GE-B-8B-F>E-<B-R16B-R16B-FE->E-<B-FE-" 

180 C2$=">D-8.D-C8.C<B-8.B-A-8.A-G-8. >D- 

D-8.<G-G-8. >D-D-8.<G-" 

190 A3$=">C8Q7D-E-R16FR16<B-&B-4R16A-8B- 

>Q8C2." 

20 B3$=*'B-8B-F>E-<B-R16B-R16B-FE->E-<B- 

FE-B-8B-F>C<B-R16B-R16B-EOC<B-EC" 

210 C3$="G8. >D-D-8.<GG8. >D-D~8 . < G >C8 . < GG 

8. >CC8.<GG8. >C" 

230 A4$="R16Q6B-R16>CR16E-R16D-C8R16C<B- 

A-GCR16<B->D-EGB->D-EQ8F8R16FF4Q8" 

240 B4$="R16Q6B-R16>CR16E-R16D-C8R16C<B- 

A-CR16GB->D-EGB->D-C8R16<FF4Q8" 

250 C4$="T120>R16B-R16>CR16E-R16D-C8R16C 

<B-A-CR16<D-EGB->D-EGF8R16<FF4T122" 

260 A5$="L804G4.FG2&G4R8A-GFGA-" 

270 Z$="GFC<A->" :B5$=Z$+Z$+Z$+Z$+Z$+Z$+Z 

$+Z$ 

28 A6$=">C4.<B->C2&C4R8D-C<B-FB-" 

290 Y$="GFD-<B->" : B6$=Y$+Y$+ Y$+Y$+Y$+ Y$+ 

"A-FD-<B->A-FD-<B->" 

30 C6$="B-8. >FF8.<B-B-8.>FF8.<B-B-8.>FF 

8.<B-B-8.B-A8.A-" 

310 A7$=">C4.<B->C2&C4R8C<B-A-GA-" 

320 X$="GEC<B->" :B7$=Y$+Y$+Y$+Y$+XS+X$+X 

$ + X$ 

330 A8$="G1" 

B8$=Z$+Z$+Z$+Z$+Y$+Y$+X$+X$ 
C8$="<F8. >CC8.<FF8. >CC8 . < FG8 . G >D~8 . D 
CC8.C<" 



340 
350 
-C8 
390 

400 



:G0$ = 



Z$="H16H16H!16H16H16H16H!16H16 
Z$+Z$+Z$+Z$ 
990 '•••• 

1000 PLAY#2,A0$,B0$,C0$,A0$,B0$, A0$ 
1010 PLAY#2.A1$.B1$.C1$,A1$,B1$.A1$ 
10 20 PLAY#2.A2$.B2$.C2$.A2$.B2$.A2$.G0$ 
1030 PLAY#2.A3$.B3$,C3$,A3$,B3$,A3$,G0$ 



G0$ 
G0$ 



muto-ci =5)jBica;o. a 

®@©;i/-^frtoBJS¥0^©MML 
■■■■■D^'?V>3 r BOSSj 



ffS©ziX>Sfrt)o r <IBHii*^ 



tzWHiSbtcOtSl^tjo 
■ ■■■■■AiKSBW^SgBj 
CDffl**7r'jy^-JUBGMH 

voi.4 r *lJi;iSK<tjCiJS»inru 



MSXS+3b\ B^ISBASICffl 
iK«SS6, nlO--H)£»U R 
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1040 
1050 
1060 
1070 
1080 
1090 
1 100 
1110 
1120 
1130 
1 140 
1150 
1160 
1200 
1210 
1220 
1230 
1240 



PLAY#2.A0$ 
PLAY#2.A1$ 
PLAY#2.A2$ 
PLAY#2.A4$ 
PLAY#2.A5$ 
PLAY#2.A6$ 
PLAY#2.A7$ 
PLAY#2,A8$ 
PLAY#2.A5$ 
PLAY#2.A6$ 
PLAY#2.A7$ 
PLAY#2.A8$ 
GOTO1000 



.B0S 
.B1S 
. B2$ 
.64$ 
.B5$ 
. B6$ 
, B7$ 
. B8$ 
>B5$ 
. B6$ 
. B7$ 
. B8$ 



-C0$ 
.CIS 
.C2$ 
, C4$ 
.C0$ 
, C6$ 
.C3$ 
-C8$ 
.C0$ 
.C6$ 
,C3$ 
>C8$ 



. A0$. 
.A1$. 
. A2S, 
.A4$, 
.A5$. 
. A6$ > 
.A7$. 
> A8$. 
, A5$> 
, A6$ > 
>A7$. 
, A8$ p 



B0$> 
B1$. 
B2$. 
B4$> 
B5$> 
B6$> 
B7$> 
B8$, 
B5$. 
B6$. 
B7$, 
88$. 



A0$.G0$ 
A1$.G0$ 
A2$.G0$ 
A4$.G0$ 
A5$,G0$ 
A6$. G0$ 
A7$.G0$ 
A8$.G0$ 
A5$.G0$ 
A6$. G0$ 
A7$.G0$ 
A8$.G0$ 



' ±Z9frU«fe v Hi 



H3/02/16 By TEN 




ie>vd60 

24>4q>1 

90>0610 

130HEJ0 

170>tJk0 

210>deL0 

260>Un60 

300>IBM0 

340>VDC0 

990>0610 

1030>bj60 

1070>DL60 

1 1 10>br60 

1 150>br60 

1220>ogJB 



20>XHO1 

30>LoH0 

100>f pO0 

140>vqU0 

180>AFQ0 

230>GE90 

270>ZwO0 

310>hT70 

350>cEI0 

1 000>ne60 

1 040>ne60 

*080>dl60 

1 120>dl60 

1 160>XE00 

1230>RE90 



21 >7O80 

40>TPN1 

1 1 0>aBe0 

150>jIL0 

190>O8F0 

240>LJc0 

280>LV70 

320>0rO0 

390>EH00 

1010>Pg60 

1050>Pg60 

1090>Po60 

1 130>Po60 

1200>0610 

1240>EH00 



22>eGV0 

50>Fu90 

120>UmR0 

160>ZX90 

200>V4fB 

250>Njg0 

290>q6Z0 

330>qe00 

400>3HQ0 

1020>1 i60 

1060>1 i60 

1 100>5p60 

1 140>5p60 

1210>EH00 



mt£Q>z.lZ&%l,Zl\X tttt-v^v) V° 



\n*mmR7ts-)\s 




r z\y\d-sstutzmm. t 






10 CALLMUSICC 1.0.1.2.1.1.1) 

20 CALLTRANSPOSEC 100) 

30 CLEAR500:DEFSTRA-G:POKE&HFA3C,24 

40 DIMA(16).B(16).C(16),D(16).E(16).F(16 

) :G = "T140" :PLAY#2.G,G.G.G.G.G 

50 PLAY#2>'*05Q6L8V15^6' , . "05Q6L4V831 7" . "0 

6Q6L12V1039" . "05Q6L8V1 3324" , "03Q6L8V1 233 

3"."V15" 



Notes notes J -"J -J -"J 



22. 24^JTBCt!2vBBEOSt?A,„ 
£fc. 7a^AlUS4», IVvO 

«j7S3ttgi5»wc»b©s-ro 
yt^%t2tc<wftbz r *mmmit 



60 '••••• INTRO •••••••••»••••••••••••• 

70 A(3)="GG16G16GGBB16B16BBG.B16G.B16DDD 
R8":A(4)="GG16G16GGBB16B16BBG.B16G.B16G2 



tfSt^«SSti/uo 

ten is. mmim<D&fiHz7m<D 

GMfEffiSHRIClSSSUrSUfctf, 

&tMD7x&£ : t,niznzi,3:om% 



80 B(1 )="GB8B8>DD<G 

DDDDC<BAG4>G4<" 

90 B(3)=**GR2.GDR2.F 

GG + AA + B>CC + D+>2-CEE + 

100 C(1 )="GAB>C<B>C 

":C(2)="GAB>C<B>CDE 

110 C(3)="-CGABR16>4 

4)="GABGAB>EFEDCDC< 

120 0(1 )="GFGFBABAG 

BADCDCGFG4" 

130 D(3)=B.(3) :D(4) = 



B8B8DD":B(2)="GL8BB>D 

":B(4)="GR8GR8BR8BR8{ 

FG>4G4<" 

<BAGA4GAB>C<B>C<BAGC>4 

DEDC<BAGFEDG4<G4>" 

R2.<AGER16>4R2EFG" :C( 

BAGFEG4<G4>" 

FGFDCDC:D(2)="GFGFBA 

"GR8GR8BR8BR8GFGFGFGF 



140 Ed )="GGBBDDFFGGB6GFGB":E(2)="GGBBDD 

FFGDGBG4R" 

150 E(3)=B(3) :E(4)="GR8GR8BR8BR8GGGGL16G 

GGGGGGG" 

160 F(1 )="CHB8HB8HS8H8HB8HB8HS8H8HB8HB8H 

S8H8HB8HB8HS8H8":F(2)=LEFT$(F(1 ) ,34)+"HB 

S16S16HBS16S16CHBS4" 

170 FC3)="HBS8R2.HBS8HBS8R2.HBS8":F(4)=" 

HBS4HBS4HBS4HBS4HBS8HBS8HBS8HBS8HBS16S16 

HBS16S16CHS16S16HS16S16" 

180 '••••• 1st •••••••••••••••••••••••• 

190 A(5)="G4G.G16B4.BBAGFGD4.'*:A(6)=''G4G 

8.G16B4.BGDEFL4GR" 

200 AC7)="GG8G8BB>EED2" : A( 8) ="CC< BB8A8G2 

.R" 

210 B(5)="GAB>CD4D4<GGBAG4D4":B(6)="GAB> 

CDEDC<BAGFG4>G4<" 

220 B(7)="G4A4>DDD4EFEDEDC<F":B(8)="GABA 

GABAGG<GGGG>4G4>G4<" 

230 C(5)="GABGAB>EDCEDC<GABGAB>DEDDEF<": 

C(6)="GABGAB>EFEFEFEEEDDDCC<DG4" 

240 C(7)="GABGAB>EDCEDCEFEFEFEEDE4" :C(8) 

="EDEDCDC<BAGFEGGA>CC<AG4G4" 

250 D(5)=D(1) :D(6)=D(2) 

260 D(7)="GFGFBABA>EDED<BABA":D(8)="GFBA 

>ED<BAGFGFGFG4" 

270 E(5)="L8GGGGBBBBGGGGDDDD**:E(6)="GGGG 

BBBBDDDDGGG4" 

280 E(7)=E(5) :E(8)="GGGGDDDDGGGGGGG4" 

290 F0RI=5T013STEP4 

300 F(I )="CHB8HS8HB8HS8HB8HS8HB8HS8HB8HS 

8HB8HS8HB8HS8HB8HS8" :F(I+1)=LEFT$(F(5).4 

3)+"HBS16S16HS16S16" 

310 F(I+2)=F(5):F(I+3)=LEFT$(F(5).37)+"H 

BS16S16HS16S16CHBS16S16HS16S16" 

320 NEXT 

330 '••••• 2nd •••••••••••••••••••••••• 

340 A(9)="L8AAA4>CCC4DDDDE2" : A ( 1 ) ="D4D4 

EEDDCXBAGFEDE" 

350 AC 11 )="GGAA>CCEED4C4<B4A4":A( 12)="G4 

G4DDEEF2.R" 



■■■■■■■■■■■■■KERft 
A¥*Sffl/Tv-)l/ra:SA V K#A 

fvo?-vts.mm%Lhzi\&, to5 



n>-tz7Srff&ntfFS. 

^OffSiB. n?-t»J5 L i'l/ruS9-„ 
®#£ : imr>Z\.\Z>0)ti't)ti<bt < j.l\< 
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?mm 



360 B(9)="A4AA>C4CCD4DDEEE4":Bd0)="EFED 

CDCDDCXBAGFEF" 

370 B( 1 1 )="GAGA>CDEEDCDC<BAGA" :B(12)="AA 

GGFFEEDDEEFFF+F+" 

380 C(9)="AGAAGA>C<B>CC<B>CEFGGFEFEDE4": 

C(10)="EEFEEDCCC<BBAEEEFFFGGGG4" 

390 C(1 1 )="AGAAGA>EFEFEFEDEEDEDC<BAGG" :C 

(12)="DDDEEEFFFF+F+F+GGGGGGGGGG4" 

400 D(9)="BABA>EDEDEDEDEDED" :Dd0)="EDED 

EDED<GFGFGFGF" 

410 Dill )="GFGF>EDEDEDED<BABA" :D( 12)="GF 

GFGFGFEDEDEDED" 

420 E(9)="AAAA>CCCCDDDDEEEE" :E(10)="DDDD 

<BBBBGGGGDDDD" 

430 Ed 1 )="GGGG>EEEEDDDD<BBBB":Ed2)="GG 

GGDDDDFFFFFFF4" 

440 '••••• 3rd •••••••••••••••••••••••• 

450 A( 13)="G4GGBBBBGGDEF2":A(14)="G4GGBB 

BBD4E4F2" 

460 A( 15)=A(3) :A(16)=A(4) 

470 B( 13)="GGG4BBB4GGDDEEFF":Bd4)="GGG4 

BBB4DD+EFF+GG+A" 

480 B(15)="G4GGB4BB-CGFEDGFEDDD + EFF+GG + A> 

1":B(16)="G4GGB4BB<:GAGAGAGA>2<GAB>C>4G4< 

490 Cd3)="GABGAB>CDECDEEDC<BAGFEDE4" :C( 

14)="GABGAB>CDECDE<DEFDEFF+4G4" 

500 Cd5)="GABGAB>CDECDE<GABGABDEFG4" :C(- 

16)="GABGAB>CDECDE<GABGAB-CGGGGGGGG>2" 

510 Dd3)="GFGFBABADCDCFEFE" :D(14)="6EGE 

BABAGEGE<!DD + EFF + GG + A>2" 

520 D(15)=D(1):D( 16)=D(2) 

530 E(13)="GGGGBBBBDDDDFFFF":E(14)="GGGG 

BBBBDDEEFFEE" 

540 E(15)=E(5) :Ed6)="GGGGBBBBGGGGGGG4" 

550 '••••• PLAY ••••••••••••••••••••••• 

560 X = 1 

570 F0RZ=XT016:PLAY#2,A(Z) .B(Z).C(Z).D(Z 

) ,E(Z) ,F(Z) :NEXT 

580 X=5:GOTO570 

590 '••••• in fcuzWWA.fc'-lt ••••• 

600 '••••• - t'fotr:/ - ••••• 

610 '••••• composed & programed 

620 '••••• by w *1»**=/3 , >" **:>5K 




10>ZI20 

50>PEr0 

90>KHd0 

130>7ED0 

i7«>evvi 
2ia>vxpe 

250>nI30 
290>aB10 
330>Y0P0 
370>pTP0 
410>9KO0 
450>oxH0 
490>GYe0 
530>wUM0 
570>dGG0 
610>x9J0 



20>Ls10 
60>XqP0 
1 00 >qSm0 
140>DHK0 
180>V4P0 
220>gIU0 
260>WOO0 
300>1uP1 
340>TYM0 
380>Rhg0 
420>vCN0 
460>Ck30 
500>5Rp0 
540>9RB0 
580>FY00 
620>24Q0 



30>8f30 
70>EZp0 
1 10>N6g0 
150>BUI0 
190>MwP0 
230>SDh0 
270>JnM0 
310>Zkc0 
350>OOJ0 
390>jch0 
430>UAO0 
470>EuN0 
510>SuW0 
550>7fO0 
590>VmL0 



40>8sS0 
80>pXO0 
120>5qK0 
160>IsL1 
200>IkD0 
240>8vb0 
280>2TA0 
320>B200 
360>DsM0 
400 >URN0 
440>S1P0 
480>Ghv0 
520>8L30 
560XCA00 
600>7wJ0 



£fci;»©GM€iaJtl<'£n©UUHri 



-i-lx^i 



C NAMCO ALL RIGHTS RESERVED 



■BGMj 



*-*D^>A;-ttC*S (1 53E) 



«t 5, r KJU7 7 -#©l§j©BG 



■CW<DV}ft<fcl^£< Lt© 
Z tfftpq©IEf;fc©fr tf I 3 o * 

L,rn-s©tfKRffr-r 



10 CALLMUSIC(0.0.2.2.2.2) 

20 CALLVOICE ( 345 . 33 . 345 . 33 . 345 . 33 . 345 . 33 

) 

30 DEFSTRA-T 

40 T="T255" 

50 PLAY#2.T.T.T,T 

60 A1="V1504L8B-4B-B-B-B-B->CDC4<8->F2.S 

F4.E-FGF4.B-4.&B-AB-AFDC2.SC2." 

70 A2="<B4BBBBB>C+D+C+4<B>F+2.&F+4.G+F+E 

F + 4.G + F + EF + 4ED + <BG+>-C + 2.<B4. >D4D" 

80 A3="E2&EDEGF+DGF+DE4.F4FG4.&GFGB-AFB- 

AFG2.F4.'* 

90 A4="D-D-D-D-4D-D-E-FE-4D-8A-2.&A-4.B- 

A-G-A-4.B-A-G-A-4G-FD-<B->E-2.&D-4." 

100 B1="V1404L8DODE-4.DDDE-4.DDDL4E-.F.B 

-.A.B-.A.F.E-.E-.F.F." 

110 B2="L8D+D+D+E4.D+D+D+E4.D+D+D+L4E.F+ 

.B.A+.B.A+.F+.A+.L8A+G+A+D+4." 

120 B3="L8R4R8D4DEDEGF+DBAGA4. R8F4FGFGB- 

AF>DD<B>C2.C<AF" 

130 B4="L8FFFG-4.FFFG-4.FFFL4G-.A-. >D-.C 

.D-.C.<A-.B-.L8A-G-A-F4.AFC 

140 C1 = "VU03L8B-B-B->C4.<B-B-B->C4.<B-B 

-B-L4>C.D.G.F.G.F.D.C.<G.L8AGAG4F" 

150 C2="BBB>C+4.<BBB>C+4.<BBB>L4C+.D+.G+ 

.F+.G+.F+.D+.F+.<L8A+G+A+B4." 

160 C3=">R2R2R40D<B->C+4.R4R8R4.R2R4FFDE 

2. AFC" 

170 C4=">D-D-D-E-4.D-D-D-E-4.D-D-D-L4E-. 

F.B-.A-.B-.A-.F.G-.<L8A-G-A->0-4.FC<A" 

180 D1 = "V1303L4B-.F.B-.F,.8-.F.B-. >E-.F.G 

.F.<B-. >C.C.<A.F." 

190 D2="B.G+.B. F+.B.F+.B. >G+.F+.G+.F+.<B 

. >C+.L8F + F + F + B." 

200 D3="R2R2R4>L8GFD+E4.R4R8R4.R2R48-AFG 

2.<F4." 

210 D4=">D-.<A-.>0-.<A-.>D-.<A-.>D-.B-.A 

-.B-.A-.D-.E-.L8<A-A-A->D-4.<FFF" 

220 PLAY#2.A1 .81 -CI .D1 

230 PLAY#2.A2.82.C2.D2 

240 PLAY#2.A3.B3.C3.D3 

250 PLAY#2.A1 .B1 -C1 .D1 

260 PLAY#2.A4.B4,C4,D4:GOTO220 
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yPxV, A-^E~— #355£: 
U53£B, ^©gf^lUJfc 

55/u3©3^©gHtf;Ii;9 

Soriffita^-cuSo ux 

ACoOriSd:<SS0±lj 1 TU 

£©T, A-^E^-icm-rsis 

Q^©;Ml©&frr[3U3U 

ixo, ^©gtfffliorns©^ 

§§©^51^ SS^lCBlo 
©#U^tHt+^LvS;g§=b^SL, 
e7y j f^-fflct;5l: > lo 
©3ii§rfflW£tB-r 3 t©r$ 
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CALL MUSIC(0,0 , 1,1,1 



A$="03L4 
B$="05L4 
C$="05L4 
D$="04L4 
E$="06L4 
T=66:PLAY 



G2. 
RF + 2 
RD2 
RB2 
RF + A 
#2,' 



D2. 
RF + 2 
RC + 2 
RA2 
GF + C + 



1,1,1, 

G2. 

RF + 2 

RD2 

RB2 

<B>C+D 



1 ) 
D2." 
RF + 2" 
RC + 2" 
RA2" 
< A2 . " 



T=T;S12V6" , "T = T;316V15" 



,"T=T;S16V11" ,"T=T;S16V11" ,"T=T;S16V1 1 

"T=T;a42V15","T=T;a3V12" 

80 PLAY#2,A$,B$,C$,D$,E$ 



3"=l-H*— AOTgroSHu)^ 
X P?i- ©5*IIi©±Cfly § 
3tA' ; d;<S5o 

m%foz>m&?m\zmv] o \z u 

ri\<„ A- ; E--IS33 : feC3 

©ffi^w^n^KOfs-So 

##tttt»«#l(i+^-f ffli/Ay^^-f 

frfcU^te / >bfcUZ\ ±© 

7P^AB, 7^>7,©^ffi 

Si U-> ^ --tt^-f (1866-1925) 

Oo #s&ffi&©r\ dfzfrr 

nffli^JTrEttBA-^r-©^ 

«-rs©cina^s«o 

7K'v:7XSlca-K*-A£ 
fty^t, tgllWcfc^CGM 
7-DM7-GM7-DM7t 



&5o 3CDM7c!:U5ffltf$lal 
©x-V, Xi>>-7th^S 
■TI2€rS5 5&&IC, MB 

-f^-7th^»D*1-53d;t 

-file, n-K*-AB, 7c 

c&sengUb-stofBn 

5„±©f?Jr'BG£frD£M£ 
-&©±lcffl B ; ^d:'5>M'K5^© 
fi^(M7)r-r*ru5 k© 
)U-SS©±CXv>-7t h 
£&t>A;-S£, K • 5 • V • ^ 
£#£>, GM7B7©gffl±C 
M7£, DM7BU©g©±B 
M7^JP^.fcffiglc^§o 

£T, CM7Ct£or, 3 
©fflg©fli/3cH£fl£t, K • 
5 • VB)b-SA' ; C©Stl©3 
Wh\ 5 • V- vBJb-h# ; E 
©3fgliffl3WSo mffiCU^K 

U5fflgBBJ13<ftoBiU 1$ 
M7©«]g£:Br'tHLU t. 



»0#tt y A J ^x-r ©Wg©5Sn 

r i/A;^f-fjfflffli©sn 

G B D FI (GM7) 

1 1 i 1 

D A C# Ft* (DM7) 

-SBG-D©/3o5ffliJ*75 
*f*\ ^©±©fflgBFtt B-E- 
©^^, B^A, D-»C#iftfi© 

eoB^LTtforiveTv )b- 

L^„ 3©2o©=l-KfflSfS 
B, i&Z&J;3Z-b£-D£m5 

ti\z>mmtz t,Lt,^M7tr 

StS£$It!©^H©£i D, Rz> 
©n-KWJSrogCUStiK 
d^r-ETu&lcBfr&IA £l\ 
53£fr6 r vAy / '<7'''i"j©ffi 
B;?nr§cfc5^7979L/fc 
a— K©;!*ltf£3:tt€> 
90 GOTO 80 

£ftBM;trfT80£Jb-7£tr 

St, 3©®}f£©UU=l-K 

©^nc-Todru-fcns., 
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Afl*c#«$r©[6gtqlo fcJKU 
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3, JtS 1 *lzES;S ; S^bt2>K <ft 
U<BI 09^-y©Tffi?f r «« j S#PS 
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•KM* 
SANKAC SSS« 
/v?&/y? It® -'MltXM 

fourth ft© S«»» 

**«**»«■ «® rtffiw 
•warn 

NORMAL RACE, HSBBiilij 

:i«U m«*e 
•SMUR 
?av? «s® 'RSB* 

mm 

•«** 
rr+¥~ *;sb 

MS* 

17}i» «««* 

•^s* 

BLUE BALL, *IS**«t 

•JERU 

5*vf ft® W#BE2. 

#771-7 tri ante 
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LOCK ON' WBiI« 

LEGLETTE *»WS 

DrJ **»» 

AdvantagE P-l 7UIIISES 

•AS* 
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7>7j(7>l»ff2 ft© *Wa 
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Mm* 

N-FONT ft© AKXti 
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•«** 

m mm® 
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MM 
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2 DATA. . . . .0. . . .?.2.»»I730S,4, 
**ME8i2>5J)*-ji5»SW?<»I*?»8t»*S 
tl!iU>i13ii8M6ii3ii7il 

S&IJ^-fWtWttS^CtaSofc©? 
tfi\ SQR^>(M)fflft;pp7J' ; t5oit,^Ly 
-KA^SLVo SS©fBS©S, ffiStf^SSS 




10 SCREEN5, 
L0R=(2. 1.1. 
6F5R4F8D3G1 
12F7R3F7" :F 
.RND(1 )»30 + 
,BF:NEXT 
20 A=RND( 1 ) 
EXT:COL0R=( 
) :DRAWA$:PS 
RI=0TOA*2:N 
RAWA$:PSET( 
0R=(1 ,0,0.1 



2:C0LOR,1 ,1 :CLS:CO 
1 ) :A$="D20F7D24F5R 
5F25" :B$="F20R5E7R 
ORN=1TO50:LINE(N*5 
170)-<N*5+6,255) ,2 

*200:FORI=0TOA*8:N 
1,4,4,4) :PSET(A,60 
ET(A,60) :DRAWB$:FO 
EXT:PSET(A.60) . 1 :D 
A. 60) .1 :DRAWB$:COL 
) :GOTO20 



SSSP I C^>(M)7T-t>&bftfcaLy„ ^ 
©^tisn5Li5a^ytfS'§t.fflr'5tB 



g& 



ISH« PIC (13*) 



1? COLOR15.7.7:SCREEN1 

D=14336:FORI=8T03l :VPOK 

D$riBBA543B1B1B284488B 

FFEBEBE8E8EBFFFFFFFFFFF 

IFI=15THENAD"5B4:NEXTEL 

YOFF 



F0RI=3T028:L0CATE27. 
FORI=21Ta24:LOCATE8.I 
") : :NEXT:Z=4: Y=17:F0R 

FORX=217T0281STEP-1 : 

Y=Y-Z:Z=Z-.5:NEXT 
S0UND8,13:F0RY=17T01 

TEB. (X.Y) .1 :NEXT:SOUN 
PUTSPRITE8, (8,218) :P 

:PLAY"L64T25506S8I15 8C 
F0RI=8T01 : I--STRIG 

8.218) :G0T028 



B:VP0KE828B.228:A 
EAD*I .VAL("SH"*MI 
B6415C2187EFFFFFF 
FFFFF" ,2»It1 ,2) ) : 
SENEXT;WI0TH32:KE 

I :PRINT"AAAA":NEX 
:PRINTSTRINGt(31 . 
I=BT05B8:NEXT 
PUTSPRITE8. (X.Y) . 

5P:SOUND8,Y:PUTSP 

08.8 

UTSPRITE1 . CX. 16B) 

8) :NEXT:PUTSPRITE1 



AAA, ZM£Z>V£5£ffiltz%-\"!?T: 

T„ MICRO SYOGO'S^XM)©tz 

MfcLVJ^S mPM® MICRO SY0G0'S(l5iI) 



1 'LIST 9 9*yT RUN =/3? 

2 COLOR, 1 , 1 :SOUND0,0:SOUND7, 1 
90:SOUND8, 1 5 : FORI =0TO23 : LOCAT 
E,0:PRINTCHRS(27)+"L":SOUND0, 
1*11 :FORJ=0TO10:NEXTJ,I : COLOR 
.8.8:SOUND6.31 : S0UND7 . 1 83 : SOU 
ND8. 16:SOUND12.50:SOUND13,0 

ta-ozi^ffis^mmtribcDWsz-to jun 

5y{Wt££1£t>-&fr]BMtz, Ji-V)Utt£. 

ftT-3 L o.--yyftfo^tcO?-ntzOUzs 




O-f >i?<r— ?%-KA-LT(.»4f;(TTV7.J';Uv7 



f©radio 



m jUN(i8a) 



2 COLOR15.0,0:SCREEN2, 0:SOUND 
7,48:S0UND6,15:X=25 

3 LINE(9,25)-(149,25) , 15:P=5 
t F0RI=9T0149STEP5 

5 IFP=5THENP=1 :L=8 

6 LINE(I,25)-(I.25+L), 15:L=5 

7 P=P+1 :NEXT:AD=&H3800 

8 FORI=0TO7:READA:VPOKEAD+I >A 
NEXT 



DATA 16, 16, 56, 56, 124, 124, 25 
254 

S=STICK(0) :PUTSPRITE0, (X,3 

8 

X = X+(S = 7ANDX< >6)-(S = 3ANDX< 
46) 

IFX=0XTHEN12ELSES0UND8.RND 
)*16:SOUND0,RND(1 )*256:S0UN 
,0:SOUND6,RND(1)#18:OX=X 

IFRNDC1 X .3THEN12 

IFS7=49THENS7=48ELSES7=49 

SOUND7,S7:60T012 



ot©tfz:©A^fc-55^>(MSX)©^Sao 
3C7.A-XUi±-tfr0£U0£Ltzo 
r-Tfeo XtK-WW©!SSB, tMIibffl 

ictsb^nfc^^^Sc ^-©ear-cm 
Bi'ict5^ft5=fe©/)\ mm'pmiintoutzo 

;l 




WAVE H/SSS *C/ufc53(l7«) 

10 SCREEN1 :C0L0R4,4,4:WIDTH32 

:KEYOFF:CLS:CLEAR100,&HD000:D 

EFINTA-Z 

20 FORI=0TO8:READA$:FORJ=0TO1 

3:POKE&HD000+I«14+J,VAL("&H"+ 

MID$(A$, J*2+1 ,2) ) : NEXT: NEXT :D 

EFUSR=&HD000 

30 FORI=0TO31 :FORJ=0TO22:LOCA 

TE31-I , J:PRINTCHRS(I+53) :NEXT 

:NEXT 

40 FORI=0TO44:U=USR( (40+I)«8) 

: FORJ = 0T0 100: NEXT: NEXT :C0L0R1 

5:GOTO40 

50 DATA 210ED0ED5BF8F7017000C 

D5C00C9 

60 DATA 00000018187E7E7E00000 

018187E 

70 DATA 7E3C000018187E7E3C240 

0001818 

80 DATA 7E3C3C240018187E3C3C2 

4240018 

90 DATA 5A7E3C3C2424185A7E3C3 

C242424 

100 DATA 5A5A7E3C3C242424185A 

7E3C3C24 

110 DATA 242400185A7E3C3C2424 

0018187E 

120 DATA 3C3C2424000018187E3C 

3C240000 

130 DATA 18187E7E3C2400000018 

187E7E3C 
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